diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-01-30 11:04:54 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-01-30 11:04:54 (GMT) |
| commit | bda1249038ccc3b3d0c8148115418b95ce5f5ff5 (patch) | |
| tree | a0038861385f1b89ce7512df6e54fa1e64b2ed40 /library | |
| parent | 331436fe3c1504028557d2b648bbf4cdbf8fa78f (diff) | |
| parent | 2ce78dbcc2f05692112c692a562a08b477ff06ab (diff) | |
| download | tk-bda1249038ccc3b3d0c8148115418b95ce5f5ff5.zip tk-bda1249038ccc3b3d0c8148115418b95ce5f5ff5.tar.gz tk-bda1249038ccc3b3d0c8148115418b95ce5f5ff5.tar.bz2 | |
Merge 8.7
Diffstat (limited to 'library')
| -rw-r--r-- | library/entry.tcl | 2 | ||||
| -rw-r--r-- | library/spinbox.tcl | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/library/entry.tcl b/library/entry.tcl index bff426c..b344a63 100644 --- a/library/entry.tcl +++ b/library/entry.tcl @@ -610,7 +610,7 @@ proc ::tk::EntryNextWord {w start} { return $pos } -# ::tk::EntryNextWord -- +# ::tk::EntrySelectNextWord -- # Returns the index of the next end-of-word position after a given # position in the text. # diff --git a/library/spinbox.tcl b/library/spinbox.tcl index 094be29..4303141 100644 --- a/library/spinbox.tcl +++ b/library/spinbox.tcl @@ -176,7 +176,7 @@ bind Spinbox <Delete> { %W delete sel.first sel.last } else { %W delete [tk::startOfCluster [%W get] [%W index insert]] \ - [tk::endOfGlyphCluster [%W get] [%W index insert]] + [tk::endOfCluster [%W get] [%W index insert]] } } bind Spinbox <BackSpace> { |