diff options
author | hughes <hughes@rpi.edu> | 2007-03-26 17:02:13 +0200 |
---|---|---|
committer | hughes <hughes@rpi.edu> | 2007-03-26 17:02:13 +0200 |
commit | 2682ece4c33d497d0e268cb0092d214c9fb2717d (patch) | |
tree | 790f56ee6146bfadf411fcb41c8a01e1e7763491 /Main.hs | |
parent | c7e2bc9dcc531916fd165a91f55703cc053eb43e (diff) | |
download | xmonad-2682ece4c33d497d0e268cb0092d214c9fb2717d.tar.gz xmonad-2682ece4c33d497d0e268cb0092d214c9fb2717d.tar.xz xmonad-2682ece4c33d497d0e268cb0092d214c9fb2717d.zip |
Workspace-specific layouts
darcs-hash:20070326150213-3a569-64dd38c00558d58f27c3803ab15485892c24cfaa.gz
Diffstat (limited to 'Main.hs')
-rw-r--r-- | Main.hs | 22 |
1 files changed, 11 insertions, 11 deletions
@@ -41,17 +41,17 @@ main = do xinesc <- getScreenInfo dpy let st = XState - { display = dpy - , screen = dflt - , xineScreens = xinesc - , wsOnScreen = M.fromList $ map (\n -> (n,n)) [0..((length xinesc)-1)] - , theRoot = rootw - , wmdelete = wmdelt - , wmprotocols = wmprot - , dimensions = (displayWidth dpy dflt, displayHeight dpy dflt) - , workspace = W.empty workspaces - , layout = defaultLayout - , leftWidth = defaultLeftWidth + { display = dpy + , screen = dflt + , xineScreens = xinesc + , wsOnScreen = M.fromList $ map (\n -> (n,n)) [0..((length xinesc)-1)] + , theRoot = rootw + , wmdelete = wmdelt + , wmprotocols = wmprot + , dimensions = (displayWidth dpy dflt, displayHeight dpy dflt) + , workspace = W.empty workspaces + , defaultLayoutDesc = startingLayoutDesc + , layoutDescs = M.empty } xSetErrorHandler -- in C, I'm too lazy to write the binding |