From ac5826f5770bbbdee755d059bc36ad250acb2891 Mon Sep 17 00:00:00 2001 From: Ivan Malison Date: Fri, 25 Mar 2022 14:13:26 -0700 Subject: [PATCH] [XMonad] Tweak windowIsminimized --- dotfiles/config/xmonad/xmonad.hs | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/dotfiles/config/xmonad/xmonad.hs b/dotfiles/config/xmonad/xmonad.hs index 0711811c..9fac963e 100644 --- a/dotfiles/config/xmonad/xmonad.hs +++ b/dotfiles/config/xmonad/xmonad.hs @@ -679,9 +679,7 @@ getWindowClassPairs = mapM windowToClassPair =<< workspaceWindows windowToClassPair w = (,) w <$> getClass w -windowIsMinimized w = do - minimized <- XS.gets minimizedStack - return $ w `elem` minimized +windowIsMinimized w = elem w <$> XS.gets minimizedStack maybeUnminimize w = windowIsMinimized w >>= flip when (maximizeWindow w)