diff options
| -rw-r--r-- | XMonad/Actions/Commands.hs | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/XMonad/Actions/Commands.hs b/XMonad/Actions/Commands.hs index 7dc7f8d..f513990 100644 --- a/XMonad/Actions/Commands.hs +++ b/XMonad/Actions/Commands.hs @@ -82,14 +82,13 @@ defaultCommands = do wscmds <- workspaceCommands return $ wscmds ++ screenCommands ++ otherCommands where - sr = broadcastMessage ReleaseResources otherCommands = [ ("shrink" , sendMessage Shrink ) , ("expand" , sendMessage Expand ) , ("next-layout" , sendMessage NextLayout ) , ("default-layout" , asks (layoutHook . config) >>= setLayout ) - , ("restart-wm" , sr >> restart "xmonad" True ) - , ("restart-wm-no-resume", sr >> restart "xmonad" False ) + , ("restart-wm" , restart "xmonad" True ) + , ("restart-wm-no-resume", restart "xmonad" False ) , ("xterm" , spawn =<< asks (terminal . config) ) , ("run" , spawn "exe=`dmenu_path | dmenu -b` && exec $exe" ) , ("kill" , kill ) |