From 6ba134c9e54d42c189d60a924c27921739b7c197 Mon Sep 17 00:00:00 2001 From: David Roundy Date: Fri, 14 Sep 2007 23:59:59 +0200 Subject: move Layout stuff into class (hokey first cut). darcs-hash:20070914215959-72aca-3feae03a6560a70908ad37d28f47c8d47321008e --- Main.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Main.hs') diff --git a/Main.hs b/Main.hs index ead2a96..8ed3555 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 [] -> (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