Update various restart bindings

This commit is contained in:
Spencer Janssen 2007-12-19 22:06:34 +00:00
parent ef14aa07ba
commit 9997b18970
2 changed files with 3 additions and 3 deletions

View File

@ -88,8 +88,8 @@ defaultCommands = do
, ("expand" , sendMessage Expand ) , ("expand" , sendMessage Expand )
, ("next-layout" , sendMessage NextLayout ) , ("next-layout" , sendMessage NextLayout )
, ("default-layout" , asks (layoutHook . config) >>= setLayout ) , ("default-layout" , asks (layoutHook . config) >>= setLayout )
, ("restart-wm" , sr >> restart Nothing True ) , ("restart-wm" , sr >> restart "xmonad" True )
, ("restart-wm-no-resume", sr >> restart Nothing False ) , ("restart-wm-no-resume", sr >> restart "xmonad" False )
, ("xterm" , spawn =<< asks (terminal . config) ) , ("xterm" , spawn =<< asks (terminal . config) )
, ("run" , spawn "exe=`dmenu_path | dmenu -b` && exec $exe" ) , ("run" , spawn "exe=`dmenu_path | dmenu -b` && exec $exe" )
, ("kill" , kill ) , ("kill" , kill )

View File

@ -77,7 +77,7 @@ keys x = M.fromList $
-- quit, or restart -- quit, or restart
, ((modMask x .|. shiftMask, xK_Escape), io (exitWith ExitSuccess)) -- %! Quit xmonad , ((modMask x .|. shiftMask, xK_Escape), io (exitWith ExitSuccess)) -- %! Quit xmonad
, ((modMask x , xK_Escape), broadcastMessage ReleaseResources >> restart (Just "xmonad") True) -- %! Restart xmonad , ((modMask x , xK_Escape), restart "xmonad" True) -- %! Restart xmonad
, ((modMask x .|. shiftMask, xK_z ), , ((modMask x .|. shiftMask, xK_z ),
layoutScreens 1 (fixedLayout [Rectangle 0 0 1024 768])) layoutScreens 1 (fixedLayout [Rectangle 0 0 1024 768]))