diff options
| author | Colin Okay <colin@cicadas.surf> | 2022-06-27 15:50:36 -0500 |
|---|---|---|
| committer | Colin Okay <colin@cicadas.surf> | 2022-06-27 15:50:36 -0500 |
| commit | a5d1f97f4d9b91d0bb345c397ffc7a551234e6e8 (patch) | |
| tree | 2dd8d35be8fd68ae9de164ecc085b503c2ac3225 /wheelwork.lisp | |
| parent | 34575cba91a05bd0508d6581ab0daea0177a0967 (diff) | |
[formatting]
Diffstat (limited to 'wheelwork.lisp')
| -rw-r--r-- | wheelwork.lisp | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/wheelwork.lisp b/wheelwork.lisp index 555366b..5807f30 100644 --- a/wheelwork.lisp +++ b/wheelwork.lisp @@ -422,8 +422,6 @@ TARGET is FOCUSABLEP" "EVENT-TYPE must be one of the slot value names for WHEELWORK::LISTENER." (?> (unit) listener #$(slot-value $listener event-type))) - - (defun eventloop-keydown (app sdl-keysym) (let ((target (get-focus app))) (when-let (handler (get-handler-for target 'keydown)) |