Merge pull request #873 from mislavzanic/mini_refactor_hidden_layout

X.L.Hidden: use the modifyWindowSet function
This commit is contained in:
Tony Zorman
2024-02-12 13:57:16 +01:00
committed by GitHub

View File

@@ -118,7 +118,7 @@ popHiddenWindow = sendMessage . PopSpecificHiddenWindow
--------------------------------------------------------------------------------
hideWindowMsg :: HiddenWindows a -> Window -> X (Maybe (HiddenWindows a))
hideWindowMsg (HiddenWindows hidden) win = do
modify (\s -> s { windowset = W.delete' win $ windowset s })
modifyWindowSet $ W.delete' win
return . Just . HiddenWindows $ hidden ++ [win]
--------------------------------------------------------------------------------