From f5cb5e5cf8a3b410a4afda52f925e84432ca2ac8 Mon Sep 17 00:00:00 2001
From: Samuel Fadel <samuel@nihil.ws>
Date: Sun, 4 Dec 2022 12:32:13 +0100
Subject: Key grabbing, handling outputs, init clients.

* main.scm: Added key press handler
* wm.scm: Added key press handler
* schewm.c: Added key grabbing, output management, client
            initialization (initial grab)
---
 main.scm | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

(limited to 'main.scm')

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))
+
-- 
cgit v1.2.3