twin/xmonad
1
0
Fork 0
mirror of https://github.com/xmonad/xmonad.git synced 2025-05-19 08:30:21 -07:00
Code Issues Packages Projects Releases Wiki Activity

Generalize the type of (<+>). It can be used for keybindings too.

Browse Source
This commit is contained in:
Adam Vogt 2009-12-05 23:36:11 +00:00
parent a16bb44934
commit d5aadf2538
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
XMonad/ManageHook.hs
View File

@ -37,8 +37,8 @@ liftX = Query . lift
idHook :: ManageHook idHook :: ManageHook
idHook = doF id idHook = doF id
-- | Compose two 'ManageHook's. -- | Infix 'mappend'. Compose two 'ManageHook' from right to left.
(<+>) :: ManageHook -> ManageHook -> ManageHook (<+>) :: Monoid m => m -> m -> m
(<+>) = mappend (<+>) = mappend
-- | Compose the list of 'ManageHook's. -- | Compose the list of 'ManageHook's.