diff options
| author | Andres Salomon <dilinger@collabora.co.uk> | 2009-09-15 18:57:53 +0200 |
|---|---|---|
| committer | Andres Salomon <dilinger@collabora.co.uk> | 2009-09-15 18:57:53 +0200 |
| commit | 76c40e5820eb2846bf37098e81b7c55e8c014042 (patch) | |
| tree | 91b0eb936d0d864bbfe56e4390eaa53c180a05f1 /XMonad/Config/Desktop.hs | |
| parent | cd29d500d627ad79606d566c0f8b6d39b8d28b20 (diff) | |
| download | XMonadContrib-76c40e5820eb2846bf37098e81b7c55e8c014042.tar.gz XMonadContrib-76c40e5820eb2846bf37098e81b7c55e8c014042.tar.xz XMonadContrib-76c40e5820eb2846bf37098e81b7c55e8c014042.zip | |
XMonadContrib: set the default cursor to left_ptr for the Desktop config
Ignore-this: a4f7417c8a4190a0cabdadbd359e217
darcs-hash:20090915165753-40516-96e1153264d254d0f4ef3b839057a80db61b5af7.gz
Diffstat (limited to 'XMonad/Config/Desktop.hs')
| -rw-r--r-- | XMonad/Config/Desktop.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/XMonad/Config/Desktop.hs b/XMonad/Config/Desktop.hs index d5bd47d..2831913 100644 --- a/XMonad/Config/Desktop.hs +++ b/XMonad/Config/Desktop.hs @@ -22,6 +22,7 @@ import XMonad import XMonad.Config (defaultConfig) import XMonad.Hooks.ManageDocks import XMonad.Hooks.EwmhDesktops +import XMonad.Util.Cursor import qualified Data.Map as M @@ -29,6 +30,7 @@ desktopConfig = defaultConfig { logHook = ewmhDesktopsLogHook , layoutHook = desktopLayoutModifiers $ layoutHook defaultConfig , manageHook = manageHook defaultConfig <+> manageDocks + , startupHook = setDefaultCursor xC_left_ptr , handleEventHook = ewmhDesktopsEventHook , keys = \c -> desktopKeys c `M.union` keys defaultConfig c } |