From 7fb3159ce65a49b2ec7666e663a90d1a5fc475e1 Mon Sep 17 00:00:00 2001 From: David Roundy Date: Thu, 20 Sep 2007 17:52:37 +0200 Subject: eliminate ugly OldLayout. darcs-hash:20070920155237-72aca-af9e13a03fd7fb1e4c5b452c5d42817bd5060b0f --- Main.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Main.hs') diff --git a/Main.hs b/Main.hs index 8ed3555..0435675 100644 --- a/Main.hs +++ b/Main.hs @@ -55,7 +55,7 @@ main = do | otherwise = new 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) + safeLayouts = case defaultLayouts of [] -> (SomeLayout Full, []); (x:xs) -> (x,xs) cf = XConf { display = dpy , theRoot = rootw -- cgit v1.2.3