diff options
author | Daniel Schoepe <asgaroth_@gmx.de> | 2009-02-03 16:55:36 +0100 |
---|---|---|
committer | Daniel Schoepe <asgaroth_@gmx.de> | 2009-02-03 16:55:36 +0100 |
commit | 8d9ce607012c847449873a60e458d87716ba924f (patch) | |
tree | 6d8131a58a6e1f7a71e63c8ff36e8c96427516b7 /XMonad/Core.hs | |
parent | eb878b5bf235ca70b192c8b5174de53b830a4885 (diff) | |
download | xmonad-8d9ce607012c847449873a60e458d87716ba924f.tar.gz xmonad-8d9ce607012c847449873a60e458d87716ba924f.tar.xz xmonad-8d9ce607012c847449873a60e458d87716ba924f.zip |
Support for custom event hooks
Ignore-this: f22f1a7ae2d958ba1b3625aa923b7efd
darcs-hash:20090203155536-cb1c6-834084657dbd5699030c7dd6dbb1ab153763b631.gz
Diffstat (limited to 'XMonad/Core.hs')
-rw-r--r-- | XMonad/Core.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/XMonad/Core.hs b/XMonad/Core.hs index c86a170..38048e5 100644 --- a/XMonad/Core.hs +++ b/XMonad/Core.hs @@ -87,6 +87,9 @@ data XConfig l = XConfig , terminal :: !String -- ^ The preferred terminal application. Default: \"xterm\" , layoutHook :: !(l Window) -- ^ The available layouts , manageHook :: !ManageHook -- ^ The action to run when a new window is opened + , handleEventHook :: !(Event -> X All) -- ^ Handle an X event, returns (All True) if the default handler + -- should also be run afterwards. mappend should be used for combining + -- event hooks in most cases. , workspaces :: ![String] -- ^ The list of workspaces' names , numlockMask :: !KeyMask -- ^ The numlock modifier , modMask :: !KeyMask -- ^ the mod modifier |