diff options
author | David Roundy <droundy@darcs.net> | 2007-09-20 23:28:43 +0200 |
---|---|---|
committer | David Roundy <droundy@darcs.net> | 2007-09-20 23:28:43 +0200 |
commit | 91d76e198ac344ad471aa6475a2a2f1af872df61 (patch) | |
tree | 6e73fc0b84ef25a4edb80d985578445214239060 /Main.hs | |
parent | 49c725b6281a9700999f86c0d8ecfa6018ee030a (diff) | |
download | metatile-91d76e198ac344ad471aa6475a2a2f1af872df61.tar metatile-91d76e198ac344ad471aa6475a2a2f1af872df61.zip |
add (unused) Layout to StackSet.
darcs-hash:20070920212843-72aca-4c73a99b58ebd9d1d179c5e627cbf4823493f4ab
Diffstat (limited to 'Main.hs')
-rw-r--r-- | Main.hs | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -52,7 +52,7 @@ main = do let winset | ("--resume" : s : _) <- args , [(x, "")] <- reads s = x - | otherwise = new workspaces $ zipWith SD xinesc gaps + | otherwise = new (fst safeLayouts) workspaces $ zipWith SD xinesc gaps gaps = take (length xinesc) $ defaultGaps ++ repeat (0,0,0,0) safeLayouts = case defaultLayouts of [] -> (SomeLayout Full, []); (x:xs) -> (x,xs) |