twin/xmonad-contrib
1
0
Fork 0
mirror of https://github.com/xmonad/xmonad-contrib.git synced 2025-05-19 11:30:22 -07:00
Code Issues Packages Projects Releases Wiki Activity

Remove excess broadcastMessage ReleaseResources from A.Commands

Browse Source 
XMonad.Operations.restart tells the layouts to release resources.  There's no
sense in duplicating it in contrib code anymore.
This commit is contained in:
Adam Vogt 2009-09-04 01:02:59 +00:00
parent a9cb7bf67a
commit cbd978c3b5
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
XMonad/Actions/Commands.hs
View File

@ -82,14 +82,13 @@ defaultCommands = do
wscmds <- workspaceCommands wscmds <- workspaceCommands
return $ wscmds ++ screenCommands ++ otherCommands return $ wscmds ++ screenCommands ++ otherCommands
where where
sr = broadcastMessage ReleaseResources
otherCommands = otherCommands =
[ ("shrink" , sendMessage Shrink ) [ ("shrink" , sendMessage Shrink )
, ("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 "xmonad" True ) , ("restart-wm" , restart "xmonad" True )
, ("restart-wm-no-resume", sr >> restart "xmonad" False ) , ("restart-wm-no-resume", 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 )