summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorfvogel <fvogelnew1@free.fr>2015-10-04 14:07:49 (GMT)
committerfvogel <fvogelnew1@free.fr>2015-10-04 14:07:49 (GMT)
commit39a05589d95ac9864792887ef9c223fa8b09fbaa (patch)
treeef380cfaee6cd737f9140e0f49ed610ce5b75c1c
parent69babf2af132856cc0221306450c09b368f89e9c (diff)
downloadtk-39a05589d95ac9864792887ef9c223fa8b09fbaa.zip
tk-39a05589d95ac9864792887ef9c223fa8b09fbaa.tar.gz
tk-39a05589d95ac9864792887ef9c223fa8b09fbaa.tar.bz2
Fixed bug [1669632fff] cases (ii) and (iii) - Tolerate a shaky hand using the mousebug_1669632fff
-rw-r--r--library/text.tcl4
1 files changed, 4 insertions, 0 deletions
diff --git a/library/text.tcl b/library/text.tcl
index 792ee3b..68ca0f5 100644
--- a/library/text.tcl
+++ b/library/text.tcl
@@ -91,6 +91,10 @@ bind Text <Control-1> {
%W edit separator
}
}
+# stop an accidental double click triggering <Double-Button-1>
+bind Text <Double-Control-1> { # nothing }
+# stop an accidental movement triggering <B1-Motion>
+bind Text <Control-B1-Motion> { # nothing }
bind Text <Left> {
tk::TextSetCursor %W insert-1displayindices
}