Print a message for unhandled events

2025-08-15 20:13:47 -07:00 · 2007-03-08 01:32:49 +00:00
parent 160f07a47c
commit 9a5523d53c
1 changed files with 1 additions and 1 deletions
--- a/Main.hs
+++ b/Main.hs
@@ -124,7 +124,7 @@ handle e@(ConfigureRequestEvent {}) = do
            }
    io $ sync dpy False

-handle _ = return ()
+handle e = trace (eventName e) -- return ()

 -- ---------------------------------------------------------------------
 -- Managing windows