diff options
author | David Roundy <droundy@darcs.net> | 2007-06-10 03:22:37 +0200 |
---|---|---|
committer | David Roundy <droundy@darcs.net> | 2007-06-10 03:22:37 +0200 |
commit | b8a5c2af010b4ed3a970102a4e68ae2f93043f6d (patch) | |
tree | 53812418e0c2d056375736289882132fc430083f /Main.hs | |
parent | c99a0d31a758ee43527e7a66c9721247ebab3f86 (diff) | |
download | metatile-b8a5c2af010b4ed3a970102a4e68ae2f93043f6d.tar metatile-b8a5c2af010b4ed3a970102a4e68ae2f93043f6d.zip |
implement Spencer's decoration suggestion.
darcs-hash:20070610012237-72aca-4c5873773e58103f57f7a0b232da58c269248fa7
Diffstat (limited to 'Main.hs')
-rw-r--r-- | Main.hs | 4 |
1 files changed, 3 insertions, 1 deletions
@@ -224,4 +224,6 @@ handle e@(ConfigureRequestEvent {ev_window = w}) = withDisplay $ \dpy -> do -- the root may have configured handle (ConfigureEvent {ev_window = w}) = whenX (isRoot w) rescreen -handle _ = return () -- trace (eventName e) -- ignoring +handle e = sendMessage e -- trace (eventName e) -- ignoring + +instance Message Event |