aboutsummaryrefslogtreecommitdiffstats
path: root/XMonad/Layout/ScratchWorkspace.hs
diff options
context:
space:
mode:
Diffstat (limited to 'XMonad/Layout/ScratchWorkspace.hs')
-rw-r--r--XMonad/Layout/ScratchWorkspace.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/XMonad/Layout/ScratchWorkspace.hs b/XMonad/Layout/ScratchWorkspace.hs
index aea473e..56febeb 100644
--- a/XMonad/Layout/ScratchWorkspace.hs
+++ b/XMonad/Layout/ScratchWorkspace.hs
@@ -41,7 +41,7 @@ toggleScratchWorkspace l =
then -- we don't yet have a scratch screen!
if scratchName `W.tagMember` s
then return () -- We'll just bail out of scratchName already exists...
- else do let scratchscreen = W.Screen scratch (-1) (SD hiddenRect (0,0,0,0))
+ else do let scratchscreen = W.Screen scratch (-1) (SD hiddenRect)
scratch = W.Workspace scratchName defaultl Nothing
s' = s { W.visible = scratchscreen: W.visible s }
modify $ \st -> st { windowset = s' }