diff options
author | marc_culler <marc.culler@gmail.com> | 2023-11-24 22:52:12 (GMT) |
---|---|---|
committer | marc_culler <marc.culler@gmail.com> | 2023-11-24 22:52:12 (GMT) |
commit | d934fbfe389ed3f79b9b4de6c94e01a928f716ec (patch) | |
tree | a47cd9eb4d195a886eeb9cf3c2ccc31124444cb5 /library/ttk | |
parent | 1e3a4e7a0607ab4e6f8af6717eed1792fd38fab3 (diff) | |
download | tk-d934fbfe389ed3f79b9b4de6c94e01a928f716ec.zip tk-d934fbfe389ed3f79b9b4de6c94e01a928f716ec.tar.gz tk-d934fbfe389ed3f79b9b4de6c94e01a928f716ec.tar.bz2 |
Switch from Control-MouseWheel to Extended-MouseWheel.
Diffstat (limited to 'library/ttk')
-rw-r--r-- | library/ttk/scrollbar.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/library/ttk/scrollbar.tcl b/library/ttk/scrollbar.tcl index c488833..0fd4c6a 100644 --- a/library/ttk/scrollbar.tcl +++ b/library/ttk/scrollbar.tcl @@ -21,7 +21,7 @@ bind TScrollbar <ButtonRelease-2> { ttk::scrollbar::Release %W %x %y } # bind TScrollbar <MouseWheel> [bind Scrollbar <MouseWheel>] bind TScrollbar <Option-MouseWheel> [bind Scrollbar <Option-MouseWheel>] -bind TScrollbar <Control-MouseWheel> [bind Scrollbar <Control-MouseWheel>] +bind TScrollbar <Extended-MouseWheel> [bind Scrollbar <Extended-MouseWheel>] proc ttk::scrollbar::Scroll {w n units} { set cmd [$w cget -command] |