Files
passepartout/lisp
Amr Gharbeia 1f8b821287
Some checks failed
Deploy (Gitea) / deploy (push) Failing after 2s
fix: backspace — normalize Croatoan key structs to keywords in on-key
Croatoan returns key structs (make-key :name :backspace) for special
keys. The on-key handler was comparing these structs to keywords like
:backspace with eq, which always failed. Keys like Enter (returned as
13) worked, but Backspace/Tab/arrows didn't. Actually, the user couldn't
delete typed characters.

Fix: normalize at the top of on-key — if the input is a key struct,
extract the :name keyword. This allows the existing keyword-based
cond dispatches to work for all keys.

Updated all tests to use (make-key :name :enter/backspace/tab) instead
of raw integer codes, matching what Croatoan actually sends.

TUI: 43/43 pass.
2026-05-06 09:48:33 -04:00
..