mirror of https://codeberg.org/cage/tinmop/
- [TUI] fixed name of backspace keycode when parsing 'command' events..
This commit is contained in:
parent
c4fbc8f997
commit
4c44c94c0d
|
@ -257,7 +257,7 @@ be either `:keybinding' or `:string'. the former for key command the latter for
|
||||||
(move-suggestion-page-left command-window))
|
(move-suggestion-page-left command-window))
|
||||||
((eq :control-right decoded-event) ; suggestion win pagination
|
((eq :control-right decoded-event) ; suggestion win pagination
|
||||||
(move-suggestion-page-right command-window))
|
(move-suggestion-page-right command-window))
|
||||||
((eq :backspace decoded-event) ; delete last command or char
|
((eq :key-backspace decoded-event) ; delete last command or char
|
||||||
(let ((command-before-last (safe-all-but-last-elt command-line)))
|
(let ((command-before-last (safe-all-but-last-elt command-line)))
|
||||||
(setf command-line nil)
|
(setf command-line nil)
|
||||||
(cond
|
(cond
|
||||||
|
|
Loading…
Reference in New Issue