Keep support for previous versions as per @w8sl comments

Author: RemoteCTO

src/O4_GUI_Utils.py

@@ -158,7 +158,7 @@ def __init__(self):
         # Widgets instances and placement
         # First row (Tile data)
         self.lat = tk.StringVar()
-        self.lat.trace_add("write", self.tile_change)
+        self.lat.trace_add("write"), self.tile_change)
         tk.Label(self.frame_tile, text="Latitude:", bg="light green").grid(
             row=0, column=0, padx=5, pady=5, sticky=E + W
         )
@@ -172,7 +172,7 @@ def __init__(self):
         self.lat_entry.grid(row=0, column=1, padx=5, pady=5, sticky=W)
 
         self.lon = tk.StringVar()
-        self.lon.trace_add("write", self.tile_change)
+        self.lon.trace_add("write"), self.tile_change)
         tk.Label(
             self.frame_tile, anchor=W, text="Longitude:", bg="light green"
         ).grid(row=0, column=2, padx=5, pady=5, sticky=E + W)
@@ -186,7 +186,7 @@ def __init__(self):
         self.lon_entry.grid(row=0, column=3, padx=5, pady=5, sticky=W)
 
         self.default_website = tk.StringVar()
-        self.default_website.trace_add("write", self.update_cfg)
+        self.default_website.trace_add("write"), self.update_cfg)
         tk.Label(
             self.frame_tile, anchor=W, text="Imagery:", bg="light green"
         ).grid(row=0, column=4, padx=5, pady=5, sticky=E + W)
@@ -201,7 +201,7 @@ def __init__(self):
         self.img_combo.grid(row=0, column=5, padx=5, pady=5, sticky=W)
 
         self.default_zl = tk.StringVar()
-        self.default_zl.trace_add("write", self.update_cfg)
+        self.default_zl.trace_add("write"), self.update_cfg)
         tk.Label(
             self.frame_tile, anchor=W, text="Zoomlevel:", bg="light green"
         ).grid(row=0, column=6, padx=5, pady=5, sticky=E + W)
@@ -898,9 +898,14 @@ def show_tile_preview(self, filepreview, lat, lon):
             0, 0, anchor=NW, image=self.photo
         )
         self.canvas.config(scrollregion=self.canvas.bbox(ALL))
-        self.canvas.bind("<ButtonPress-3>", self.scroll_start)
-        self.canvas.bind("<B3-Motion>", self.scroll_move)
-        self.canvas.bind("<Control-ButtonPress-3>", self.delPol)
+        if "dar" in sys.platform and tk.TkVersion < 9:
+            self.canvas.bind("<ButtonPress-2>", self.scroll_start)
+            self.canvas.bind("<B2-Motion>", self.scroll_move)
+            self.canvas.bind("<Control-ButtonPress-2>", self.delPol)
+        else:
+            self.canvas.bind("<ButtonPress-3>", self.scroll_start)
+            self.canvas.bind("<B3-Motion>", self.scroll_move)
+            self.canvas.bind("<Control-ButtonPress-3>", self.delPol)
         self.canvas.bind(
             "<ButtonPress-1>", lambda event: self.canvas.focus_set()
         )
@@ -1361,8 +1366,12 @@ def __init__(self, parent, lat, lon):
         self.canvas.yview_moveto(y0 / self.resolution)
         self.nx0 = int((8 * x0) // self.resolution)
         self.ny0 = int((8 * y0) // self.resolution)
-        self.canvas.bind("<ButtonPress-3>", self.scroll_start)
-        self.canvas.bind("<B3-Motion>", self.scroll_move)
+        if "dar" in sys.platform and tk.TkVersion < 9:
+            self.canvas.bind("<ButtonPress-2>", self.scroll_start)
+            self.canvas.bind("<B2-Motion>", self.scroll_move)
+        else:
+            self.canvas.bind("<ButtonPress-3>", self.scroll_start)
+            self.canvas.bind("<B3-Motion>", self.scroll_move)
         self.canvas.bind("<Double-Button-1>", self.select_tile)
         self.canvas.bind("<Shift-ButtonPress-1>", self.add_tile)
         self.canvas.bind("<Control-ButtonPress-1>", self.toggle_to_custom)