summaryrefslogtreecommitdiff
path: root/Master/tlpkg/tltcl/lib/tk8.6/ttk/scale.tcl
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/tltcl/lib/tk8.6/ttk/scale.tcl')
-rw-r--r--Master/tlpkg/tltcl/lib/tk8.6/ttk/scale.tcl8
1 files changed, 4 insertions, 4 deletions
diff --git a/Master/tlpkg/tltcl/lib/tk8.6/ttk/scale.tcl b/Master/tlpkg/tltcl/lib/tk8.6/ttk/scale.tcl
index 62c85bf4c3a..61c4136141d 100644
--- a/Master/tlpkg/tltcl/lib/tk8.6/ttk/scale.tcl
+++ b/Master/tlpkg/tltcl/lib/tk8.6/ttk/scale.tcl
@@ -9,15 +9,15 @@ namespace eval ttk::scale {
}
}
-bind TScale <ButtonPress-1> { ttk::scale::Press %W %x %y }
+bind TScale <Button-1> { ttk::scale::Press %W %x %y }
bind TScale <B1-Motion> { ttk::scale::Drag %W %x %y }
bind TScale <ButtonRelease-1> { ttk::scale::Release %W %x %y }
-bind TScale <ButtonPress-2> { ttk::scale::Jump %W %x %y }
+bind TScale <Button-2> { ttk::scale::Jump %W %x %y }
bind TScale <B2-Motion> { ttk::scale::Drag %W %x %y }
bind TScale <ButtonRelease-2> { ttk::scale::Release %W %x %y }
-bind TScale <ButtonPress-3> { ttk::scale::Jump %W %x %y }
+bind TScale <Button-3> { ttk::scale::Jump %W %x %y }
bind TScale <B3-Motion> { ttk::scale::Drag %W %x %y }
bind TScale <ButtonRelease-3> { ttk::scale::Release %W %x %y }
@@ -52,7 +52,7 @@ proc ttk::scale::Press {w x y} {
}
}
-# scale::Jump -- ButtonPress-2/3 binding for scale acts like
+# scale::Jump -- Button-2/3 binding for scale acts like
# Press except that clicking in the trough jumps to the
# clicked position.
proc ttk::scale::Jump {w x y} {