diff options
| -rw-r--r-- | XMonad/Actions/Commands.hs | 4 | ||||
| -rw-r--r-- | XMonad/Config/Droundy.hs | 2 |
2 files changed, 3 insertions, 3 deletions
diff --git a/XMonad/Actions/Commands.hs b/XMonad/Actions/Commands.hs index 6892957..eb7d1e9 100644 --- a/XMonad/Actions/Commands.hs +++ b/XMonad/Actions/Commands.hs @@ -88,8 +88,8 @@ defaultCommands = do , ("expand" , sendMessage Expand ) , ("next-layout" , sendMessage NextLayout ) , ("default-layout" , asks (layoutHook . config) >>= setLayout ) - , ("restart-wm" , sr >> restart Nothing True ) - , ("restart-wm-no-resume", sr >> restart Nothing False ) + , ("restart-wm" , sr >> restart "xmonad" True ) + , ("restart-wm-no-resume", sr >> restart "xmonad" False ) , ("xterm" , spawn =<< asks (terminal . config) ) , ("run" , spawn "exe=`dmenu_path | dmenu -b` && exec $exe" ) , ("kill" , kill ) diff --git a/XMonad/Config/Droundy.hs b/XMonad/Config/Droundy.hs index 0657dd5..d4d4088 100644 --- a/XMonad/Config/Droundy.hs +++ b/XMonad/Config/Droundy.hs @@ -77,7 +77,7 @@ keys x = M.fromList $ -- quit, or restart , ((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 ), layoutScreens 1 (fixedLayout [Rectangle 0 0 1024 768])) |