Add more recognized keys to the editor

This commit is contained in:
John Lorentzson 2025-07-31 11:49:14 +02:00
parent c59bad4bb7
commit eb2fac312a

View file

@ -873,7 +873,13 @@ Additionally ensures correct line numbers on the way, as a bonus."
(cons :c key)) (cons :c key))
(defparameter *csi-sequences* (defparameter *csi-sequences*
'(((#\1 #\7 #\~) :f6) '(((#\2 #\~) :insert)
((#\3 #\~) :delete)
((#\5 #\~) :page-up)
((#\6 #\~) :page-down)
((#\2 #\8 #\~) :help)
((#\1 #\7 #\~) :f6)
((#\2 #\9 #\~) :f6) ; Alias for VT220's "Do" key
((#\1 #\8 #\~) :f7) ((#\1 #\8 #\~) :f7)
((#\1 #\9 #\~) :f8) ((#\1 #\9 #\~) :f8)
((#\2 #\0 #\~) :f9) ((#\2 #\0 #\~) :f9)