twin/xmonad
1
0
Fork 0
mirror of https://github.com/xmonad/xmonad.git synced 2025-08-15 20:13:47 -07:00
Code Issues Packages Projects Releases Wiki Activity

setLayout should not call sendMessage, because sendMessage calls windows

Browse Source
This commit is contained in:
Spencer Janssen
2007-09-28 01:15:10 +00:00
parent 4fd7353d8e
commit 34bbbf59c4
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
Operations.hs
View File

@@ -329,9 +329,9 @@ instance Message Event
-- | Set the layout of the currently viewed workspace -- | Set the layout of the currently viewed workspace
setLayout :: SomeLayout Window -> X () setLayout :: SomeLayout Window -> X ()
setLayout l = do setLayout l = do
sendMessage ReleaseResources ss@(W.StackSet { W.current = c@(W.Screen { W.workspace = ws })}) <- gets windowset
windows $ \ss@(W.StackSet { W.current = c@(W.Screen { W.workspace = ws })}) handleMessage (W.layout ws) (SomeMessage ReleaseResources)
-> ss {W.current = c { W.workspace = ws { W.layout = l } } } windows $ const $ ss {W.current = c { W.workspace = ws { W.layout = l } } }
-- Layout selection manager -- Layout selection manager