X.Config.hs, ./man/xmonad.hs: update Event Hook doc

This commit is contained in:
wirtwolff 2009-02-09 18:38:37 +00:00
parent a931776e54
commit 72885e7e24
2 changed files with 19 additions and 7 deletions

View File

@ -127,7 +127,8 @@ logHook = return ()
-- Event handling
-- | Defines a custom handler function for X Events. The function should
-- return True if the default handler is to be run afterwards.
-- return (All True) if the default handler is to be run afterwards.
-- To combine event hooks, use mappend or mconcat from Data.Monoid.
handleEventHook :: Event -> X All
handleEventHook _ = return (All True)

View File

@ -18,6 +18,10 @@ import qualified Data.Map as M
--
myTerminal = "xterm"
-- Whether focus follows the mouse pointer.
myFocusFollowsMouse :: Bool
myFocusFollowsMouse = True
-- Width of the window border in pixels.
--
myBorderWidth = 1
@ -216,10 +220,16 @@ myManageHook = composeAll
, resource =? "desktop_window" --> doIgnore
, resource =? "kdesktop" --> doIgnore ]
-- Whether focus follows the mouse pointer.
myFocusFollowsMouse :: Bool
myFocusFollowsMouse = True
------------------------------------------------------------------------
-- Event handling
-- * EwmhDesktops users should change this to ewmhDesktopsEventHook
--
-- Defines a custom handler function for X Events. The function should
-- return (All True) if the default handler is to be run afterwards. To
-- combine event hooks use mappend or mconcat from Data.Monoid.
--
myEventHook = handleEventHook
------------------------------------------------------------------------
-- Status bars and logging
@ -274,6 +284,7 @@ defaults = defaultConfig {
-- hooks, layouts
layoutHook = myLayout,
manageHook = myManageHook,
handleEventHook = myEventHook,
logHook = myLogHook,
startupHook = myStartupHook
}