diff options
| -rw-r--r-- | library/ttk/entry.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/library/ttk/entry.tcl b/library/ttk/entry.tcl index 0a61ffa..45e3506 100644 --- a/library/ttk/entry.tcl +++ b/library/ttk/entry.tcl @@ -160,8 +160,8 @@ bind TEntry <<TkEndIMEMarkedText>> { bind TEntry <<TkClearIMEMarkedText>> { %W delete [dict get $::tk::Priv(IMETextMark) "%W"] [%W index insert] } -bind Entry <<TkAccentBackspace>> { - tk::EntryBackspace %W +bind TEntry <<TkAccentBackspace>> { + ttk::entry::Backspace %W } ### Clipboard procedures. |