twin/xmonad-contrib
1
0
Fork 0
mirror of https://github.com/xmonad/xmonad-contrib.git synced 2025-07-31 12:11:52 -07:00
Code Issues Packages Projects Releases Wiki Activity

Merge pull request #127 from bennofs/patch-1

Browse Source 
DynamicProperty: execute other hooks
This commit is contained in:
geekosaur
2016-12-09 23:10:06 -05:00
committed by GitHub
parent f837a4fb36 0949b9ec91
commit 061edbd954
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
XMonad/Hooks/DynamicProperty.hs
View File

@@ -58,8 +58,8 @@ dynamicPropertyChange prop hook PropertyEvent { ev_window = w, ev_atom = a, ev_p
when (ps == propertyNewValue && a == pa) $ do when (ps == propertyNewValue && a == pa) $ do
g <- appEndo <$> userCodeDef (Endo id) (runQuery hook w) g <- appEndo <$> userCodeDef (Endo id) (runQuery hook w)
windows g windows g
return (All False) -- so anything else also processes it return mempty -- so anything else also processes it
dynamicPropertyChange _ _ _ = return (All False) dynamicPropertyChange _ _ _ = return mempty
-- | A shorthand for the most common case, dynamic titles -- | A shorthand for the most common case, dynamic titles
dynamicTitle :: ManageHook -> Event -> X All dynamicTitle :: ManageHook -> Event -> X All