From 28a3ff3d9081679a7bc5aedfd2626a85ab3c85df Mon Sep 17 00:00:00 2001 From: Adam Vogt Date: Tue, 3 Aug 2010 16:11:17 +0200 Subject: Adjust X.C.Desktop documentation content. Ignore-this: 9c2616514be4dbb722958bc5a11357b1 Correct errors regarding a description of `mappend' for X Use <+> more often since that's `consistent', and there is no difference since it's the same as >> when all arguments have the same type (which they do... otherwise people aren't just combining valid values for that field of the config). darcs-hash:20100803141117-1499c-e65c9bd2130461f92926cd17ad9edf0912c768fe.gz --- XMonad/Config/Desktop.hs | 16 +++++++--------- 1 file changed, 7 insertions(+), 9 deletions(-) (limited to 'XMonad/Config/Desktop.hs') diff --git a/XMonad/Config/Desktop.hs b/XMonad/Config/Desktop.hs index 0084306..e05c577 100644 --- a/XMonad/Config/Desktop.hs +++ b/XMonad/Config/Desktop.hs @@ -126,7 +126,7 @@ import qualified Data.Map as M -- To add to the logHook while still sending workspace and window information -- to DE apps use something like: -- --- > , logHook = myLogHook >> logHook desktopConfig +-- > , logHook = myLogHook <+> logHook desktopConfig -- -- Or for more elaborate logHooks you can use @do@: -- @@ -138,25 +138,23 @@ import qualified Data.Map as M -- $eventHook -- To customize xmonad's event handling while still having it respond --- to EWMH events from pagers, task bars, etc. add to your imports: +-- to EWMH events from pagers, task bars: -- --- > import Data.Monoid +-- > , handleEventHook = myEventHooks <+> handleEventHook desktopConfig -- --- and use 'Data.Monoid.mappend' to combine event hooks (right to left application like @\<+\>@) --- --- > , handleEventHook = mappend myEventHooks (handleEventHook desktopConfig) --- --- or 'Data.Monoid.mconcat' (like @composeAll@) +-- or 'mconcat' if you write a list event of event hooks -- -- > , handleEventHook = mconcat -- > [ myMouseHandler -- > , myMessageHandler -- > , handleEventHook desktopConfig ] -- +-- Note that the event hooks are run left to right (in contrast to +-- 'ManageHook'S which are right to left) -- $startupHook -- To run the desktop startupHook, plus add further actions to be run each --- time xmonad starts or restarts, use '>>' to combine actions as in the +-- time xmonad starts or restarts, use '<+>' to combine actions as in the -- logHook example, or something like: -- -- > , startupHook = do -- cgit v1.2.3