From e5104cf39570605859c3648ed83c37fe647b0e3f Mon Sep 17 00:00:00 2001
From: Colin Okay <colin@cicadas.surf>
Date: Mon, 27 Jun 2022 15:23:35 -0500
Subject: [example] 1 2 and 3 find the right asset root automatically

---
 wheelwork.lisp | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'wheelwork.lisp')

diff --git a/wheelwork.lisp b/wheelwork.lisp
index 5807f30..555366b 100644
--- a/wheelwork.lisp
+++ b/wheelwork.lisp
@@ -422,6 +422,8 @@ 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)) 
-- 
cgit v1.2.3