diff options
Diffstat (limited to 'XMonad/Hooks')
| -rw-r--r-- | XMonad/Hooks/Minimize.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/XMonad/Hooks/Minimize.hs b/XMonad/Hooks/Minimize.hs index e293e6d..dd9567c 100644 --- a/XMonad/Hooks/Minimize.hs +++ b/XMonad/Hooks/Minimize.hs @@ -47,7 +47,7 @@ minimizeEventHook (ClientMessageEvent {ev_window = w, when (mt == a_cs) $ do let message = fromIntegral . head $ dt when (message == normalState) $ sendMessage (RestoreMinimizedWin w) - when (message == iconicState) $ sendMessage (MinimizeWin w) + when (message == iconicState) $ minimizeWindow w return (All True) minimizeEventHook _ = return (All True) |