aboutsummaryrefslogtreecommitdiffstats
path: root/UrgencyHook.hs
diff options
context:
space:
mode:
Diffstat (limited to 'UrgencyHook.hs')
-rw-r--r--UrgencyHook.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/UrgencyHook.hs b/UrgencyHook.hs
index ab89bd7..95fef41 100644
--- a/UrgencyHook.hs
+++ b/UrgencyHook.hs
@@ -22,7 +22,7 @@ instance LayoutModifier WithUrgencyHook Window where
when (testBit flags urgencyHintBit) $ do
urgencyHook w
-- Is clearing the bit really necessary? Xlib manual advises it.
- _ <- io $ setWMHints dpy w wmh { wmh_flags = clearBit flags urgencyHintBit }
+ io $ setWMHints dpy w wmh { wmh_flags = clearBit flags urgencyHintBit }
return ()
_ -> return ()
return Nothing