From 9aa2eb22301f0d3b62ae067ef039893ab3f0d491 Mon Sep 17 00:00:00 2001 From: Anders Engstrom Date: Wed, 13 May 2009 17:57:32 +0200 Subject: LayoutBuilder - make an example more sane Ignore-this: 772566441df97479c49b6b149b57fc27 darcs-hash:20090513155732-8978f-27e6c7acc33953bd0135fd83d7951f1e51d06efb.gz --- XMonad/Layout/LayoutBuilder.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'XMonad/Layout/LayoutBuilder.hs') diff --git a/XMonad/Layout/LayoutBuilder.hs b/XMonad/Layout/LayoutBuilder.hs index 0b16a93..23a4f27 100644 --- a/XMonad/Layout/LayoutBuilder.hs +++ b/XMonad/Layout/LayoutBuilder.hs @@ -44,9 +44,9 @@ import Control.Monad -- > myLayouts = ( (layoutN 1 (relBox 0 0 0.5 1) (Just $ relBox 0 0 1 1) $ simpleTabbed) -- > $ (layoutAll (relBox 0.5 0 1 1) $ simpleTabbed) -- > ) ||| --- > ( (layoutN 1 (relBox (1/3) 0 (1/2) 1) (Just $ relBox 0 0 1 1) $ Tall 0 0 0) --- > $ (layoutR 0.1 0.5 (relBox (2/3) 0 1 1) Nothing $ Tall 0 0 0) --- > $ (layoutAll (relBox 0 0 (1/3) 1) $ Tall 0 0 0) +-- > ( (layoutN 1 (relBox (1/3) 0 (1/2) 1) (Just $ relBox 0 0 1 1) $ Tall 0 0.01 0.5) +-- > $ (layoutR 0.1 0.5 (relBox (2/3) 0 1 1) Nothing $ Tall 0 0.01 0.5) +-- > $ (layoutAll (relBox 0 0 (1/3) 1) $ Tall 0 0.01 0.5) -- > ) ||| -- > ( (layoutN 1 (absBox (-512-200) 0 512 0) (Just $ relBox 0 0 1 1) $ simpleTabbed) -- > $ (layoutN 1 (absBox (-200) 0 0 0) Nothing $ simpleTabbed) -- cgit v1.2.3