summaryrefslogtreecommitdiffstats
path: root/library
diff options
context:
space:
mode:
authorfvogel <fvogel@noemail.net>2015-10-04 08:31:40 (GMT)
committerfvogel <fvogel@noemail.net>2015-10-04 08:31:40 (GMT)
commit9e5f3317fab8f35a8f0602288b1684cbaba8218a (patch)
treec26ad84ae8e600765f7a3d68ab3e19c1f9c1bf76 /library
parent4565a6d3a20125c926f9bd06d638622569ac6d18 (diff)
downloadtk-9e5f3317fab8f35a8f0602288b1684cbaba8218a.zip
tk-9e5f3317fab8f35a8f0602288b1684cbaba8218a.tar.gz
tk-9e5f3317fab8f35a8f0602288b1684cbaba8218a.tar.bz2
Added forgotten comment for case (i)
FossilOrigin-Name: a42f418ab75eeebfa194d650dd65f314a2e573c8
Diffstat (limited to 'library')
-rw-r--r--library/text.tcl2
1 files changed, 2 insertions, 0 deletions
diff --git a/library/text.tcl b/library/text.tcl
index 4a0e2c7..080b133 100644
--- a/library/text.tcl
+++ b/library/text.tcl
@@ -85,6 +85,8 @@ bind Text <ButtonRelease-1> {
}
bind Text <Control-1> {
%W mark set insert @%x,%y
+ # An operation that moves the insert mark without making it
+ # one end of the selection must insert an autoseparator
if {[%W cget -autoseparators]} {
%W edit separator
}