cage/tinmop
1
0
Fork 0
mirror of https://codeberg.org/cage/tinmop/ synced 2025-01-06 01:36:49 +01:00
Code Issues

- fixed typo.

Browse Source
This commit is contained in:
cage 2023-05-21 11:18:22 +02:00
parent 5b261cd608
commit 338dd77e70
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/command-window.lisp
View File

@ -250,7 +250,7 @@ be either `:keybinding' or `:string'. the former for key command the latter for
"Intercept UI events in keybinding mode" "Intercept UI events in keybinding mode"
(with-accessors ((command-line command-line) (with-accessors ((command-line command-line)
(suggestions-win suggestions-win)) command-window (suggestions-win suggestions-win)) command-window
;; some envents should by intercepted by command window ;; some events should by intercepted by command window
(let ((decoded-event (decode-key-event event :convert-symbol-to-string nil))) (let ((decoded-event (decode-key-event event :convert-symbol-to-string nil)))
(cond (cond
((eq :control-left decoded-event) ; suggestion win pagination ((eq :control-left decoded-event) ; suggestion win pagination