Skip to content

Commit

Permalink
Remove logging on key press
Browse files Browse the repository at this point in the history
  • Loading branch information
sdilts committed Nov 2, 2024
1 parent 6111b13 commit 17842f9
Showing 1 changed file with 0 additions and 5 deletions.
5 changes: 0 additions & 5 deletions lisp/main.lisp
Original file line number Diff line number Diff line change
Expand Up @@ -10,11 +10,6 @@
(cffi:with-foreign-slots ((keysyms modifiers keysyms-len) info (:struct hrt-keypress-info))
(dotimes (i keysyms-len)
(let ((key (make-key (cffi:mem-aref keysyms :uint32 i) modifiers)))
(log-string :trace (lambda (s)
(format s "Key Pressed: ")
(print-key key s)
(format s ": ~A"
(xkb:keysym-get-name (mahogany/keyboard::key-keysym key)))))
(handle-key-event key seat)))))

(defmacro init-callback-struct (variable type &body sets)
Expand Down

0 comments on commit 17842f9

Please sign in to comment.