summaryrefslogtreecommitdiffstats
path: root/library/text.tcl
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2020-09-29 12:05:59 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2020-09-29 12:05:59 (GMT)
commit71eb85666db1bf1262bf301935e7d1674cd06661 (patch)
tree4732c41edd69381776f475cbc0b0f70cf05c9fc7 /library/text.tcl
parentf229cc87ab8e94200976b0233cfe07e5887cea49 (diff)
parente156e1d87e6eff493352961a0479c5f3630ef481 (diff)
downloadtk-71eb85666db1bf1262bf301935e7d1674cd06661.zip
tk-71eb85666db1bf1262bf301935e7d1674cd06661.tar.gz
tk-71eb85666db1bf1262bf301935e7d1674cd06661.tar.bz2
Merge trunk.
Tweak bindings in cscroll demo. Remove comment in text.tcl which is no longer necessary
Diffstat (limited to 'library/text.tcl')
-rw-r--r--library/text.tcl11
1 files changed, 0 insertions, 11 deletions
diff --git a/library/text.tcl b/library/text.tcl
index f25f639..00806f7 100644
--- a/library/text.tcl
+++ b/library/text.tcl
@@ -441,17 +441,6 @@ bind Text <B2-Motion> {
}
set ::tk::Priv(prevPos) {}
-# The MouseWheel will typically only fire on Windows and MacOS X.
-# However, someone could use the "event generate" command to produce one
-# on other platforms. We must be careful not to round -ve values of %D
-# down to zero.
-
-# We must make sure that positive and negative movements are rounded
-# equally to integers, avoiding the problem that
-# (int)1/3 = 0,
-# but
-# (int)-1/3 = -1
-# The following code ensure equal +/- behaviour.
bind Text <MouseWheel> {
tk::MouseWheel y %D -3.0 pixels
}