twin/xmonad-contrib
1
0
Fork 0
mirror of https://github.com/xmonad/xmonad-contrib.git synced 2025-08-01 12:41:52 -07:00
Code Issues Packages Projects Releases Wiki Activity

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

Browse Source
This commit is contained in:
Andres Salomon
2009-09-15 16:57:53 +00:00
parent 9ac6c9a24d
commit bcab2509d3
1 changed files with 2 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
XMonad/Config/Desktop.hs
View File

@@ -22,6 +22,7 @@ import XMonad
import XMonad.Config (defaultConfig) import XMonad.Config (defaultConfig)
import XMonad.Hooks.ManageDocks import XMonad.Hooks.ManageDocks
import XMonad.Hooks.EwmhDesktops import XMonad.Hooks.EwmhDesktops
import XMonad.Util.Cursor
import qualified Data.Map as M import qualified Data.Map as M
@@ -29,6 +30,7 @@ desktopConfig = defaultConfig
{ logHook = ewmhDesktopsLogHook { logHook = ewmhDesktopsLogHook
, layoutHook = desktopLayoutModifiers $ layoutHook defaultConfig , layoutHook = desktopLayoutModifiers $ layoutHook defaultConfig
, manageHook = manageHook defaultConfig <+> manageDocks , manageHook = manageHook defaultConfig <+> manageDocks
, startupHook = setDefaultCursor xC_left_ptr
, handleEventHook = ewmhDesktopsEventHook , handleEventHook = ewmhDesktopsEventHook
, keys = \c -> desktopKeys c `M.union` keys defaultConfig c } , keys = \c -> desktopKeys c `M.union` keys defaultConfig c }