1 files changed, 4 insertions, 3 deletions
diff --git a/main.scm b/main.scm
index f8ac169..e0647ab 100644
--- a/main.scm
+++ b/main.scm
@@ -11,11 +11,12 @@
   (make-config 2 0))
 
 (when (wm-init)
-  (wm-set-configure-notify-handler!
-   (lambda (x y w h)
-     (display (+ x y w h))
+  (wm-set-key-press-handler!
+   (lambda (mod keysym)
+     (display (list mod keysym))
      (display "\n")))
   (display config)
   (display "\n")
   (wm-run)
   (wm-quit))
+