diff options
author | Jason Creighton <jcreigh@gmail.com> | 2007-06-11 04:02:49 +0200 |
---|---|---|
committer | Jason Creighton <jcreigh@gmail.com> | 2007-06-11 04:02:49 +0200 |
commit | b1b682719ed654b1dd86a7f87986d7cc173078fc (patch) | |
tree | 2d5cc7b99f6913f220263a7d38c6538aac404eee | |
parent | 242b06df642f135f1b4e849d49a18099cf71d0e9 (diff) | |
download | metatile-b1b682719ed654b1dd86a7f87986d7cc173078fc.tar metatile-b1b682719ed654b1dd86a7f87986d7cc173078fc.zip |
comment only
darcs-hash:20070611020249-b9aa7-d00e960a3f26a54acdc7a869ad88ee9d437a470b
-rw-r--r-- | Main.hs | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -181,11 +181,11 @@ handle e@(MappingNotifyEvent {ev_window = w}) = do -- click on an unfocused window, makes it focused on this workspace handle e@(ButtonEvent {ev_window = w,ev_event_type = t,ev_button = b }) | t == buttonPress = do + -- If it's the root window, then it's something we + -- grabbed in grabButtons. Otherwise, it's click-to-focus. isr <- isRoot w if isr then whenJust (M.lookup (cleanMask (ev_state e), b) mouseBindings) ($ ev_subwindow e) else focus w - -- If it's the root window, then it's something we - -- grabbed in grabButtons. Otherwise, it's click-to-focus. sendMessage e -- Always send button events. -- entered a normal window, makes this focused. |