diff options
| author | fvogel <fvogelnew1@free.fr> | 2018-01-15 20:56:57 (GMT) |
|---|---|---|
| committer | fvogel <fvogelnew1@free.fr> | 2018-01-15 20:56:57 (GMT) |
| commit | 07a6cd2185de4b3d27104dad6178c841d0fcb4d9 (patch) | |
| tree | c771f4f59494acac88b819b502c787745832948d /library | |
| parent | e56f7568a9098556d07267dbfd0d84238207983a (diff) | |
| download | tk-07a6cd2185de4b3d27104dad6178c841d0fcb4d9.zip tk-07a6cd2185de4b3d27104dad6178c841d0fcb4d9.tar.gz tk-07a6cd2185de4b3d27104dad6178c841d0fcb4d9.tar.bz2 | |
Remove unnecessary (in the legacy text widget) check for normal state when <Meta-d>
Diffstat (limited to 'library')
| -rw-r--r-- | library/text.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/library/text.tcl b/library/text.tcl index 5b6628a..468696b 100644 --- a/library/text.tcl +++ b/library/text.tcl @@ -358,7 +358,7 @@ bind Text <Meta-b> { } } bind Text <Meta-d> { - if {[%W cget -state] eq "normal" && !$tk_strictMotif && [%W compare end != insert+1c]} { + if {!$tk_strictMotif && [%W compare end != insert+1c]} { %W delete insert [tk::TextNextWord %W insert] } } |