From 1ece15d3c02b97432d14fd339122e8302cc1a483 Mon Sep 17 00:00:00 2001
From: fvogel <fvogelnew1@free.fr>
Date: Sun, 4 Oct 2015 08:31:40 +0000
Subject: Added forgotten comment for case (i)

---
 library/text.tcl | 2 ++
 1 file changed, 2 insertions(+)

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
     }
-- 
cgit v0.12