diff options
| author | fvogel <fvogel@noemail.net> | 2015-10-04 08:32:33 (GMT) |
|---|---|---|
| committer | fvogel <fvogel@noemail.net> | 2015-10-04 08:32:33 (GMT) |
| commit | 8a641263ce78cf02316a0c234ff4dbc5eec05f83 (patch) | |
| tree | d67485577de80a784c77416adfb94ba92e938990 /library | |
| parent | 9e5f3317fab8f35a8f0602288b1684cbaba8218a (diff) | |
| download | tk-8a641263ce78cf02316a0c234ff4dbc5eec05f83.zip tk-8a641263ce78cf02316a0c234ff4dbc5eec05f83.tar.gz tk-8a641263ce78cf02316a0c234ff4dbc5eec05f83.tar.bz2 | |
Added forgotten comment for case (iv)
FossilOrigin-Name: 432e4b3bed5f3e5c1041d7e439bf5e90991ae5da
Diffstat (limited to 'library')
| -rw-r--r-- | library/text.tcl | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/library/text.tcl b/library/text.tcl index 080b133..f973984 100644 --- a/library/text.tcl +++ b/library/text.tcl @@ -246,6 +246,8 @@ bind Text <Control-slash> { } bind Text <Control-backslash> { %W tag remove sel 1.0 end + # An operation that clears the selection must insert an autoseparator, + # because the selection operation may have moved the insert mark if {[%W cget -autoseparators]} { %W edit separator } |