XMonadContrib: set the default cursor to left_ptr for the Desktop config

This commit is contained in:
Andres Salomon
2009-09-15 16:57:53 +00:00
parent 9ac6c9a24d
commit bcab2509d3

View File

@@ -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 }