Update layouts: use LayoutBuilderP from xmonad-contribs.

Ilya Portnov [2011-05-12 02:34:43]
Update layouts: use LayoutBuilderP from xmonad-contribs.
Filename
lib/Layouts.hs
diff --git a/lib/Layouts.hs b/lib/Layouts.hs
index b1f01bc..17fe481 100644
--- a/lib/Layouts.hs
+++ b/lib/Layouts.hs
@@ -5,6 +5,7 @@ import Data.Ratio ((%))

 import XMonad hiding ((|||))
 import XMonad.Hooks.ManageDocks hiding (L,R)
+import XMonad.Util.WindowPropertiesRE

 -- Import contrib layouts
 import XMonad.Layout.AutoMaster
@@ -32,15 +33,15 @@ import XMonad.Layout.Maximize
 import XMonad.Layout.Minimize
 import XMonad.Layout.Simplest
 import XMonad.Layout.Groups
+import XMonad.Layout.LayoutBuilderP

 import qualified XMonad.Layout.WindowNavigation as Nav

-import LayoutBuilderP
 import Themes

-lugChats = Title "lug-mgn" `Or` Title "math"
-xmonadChats = Title "xmonad" `Or` Title "#xmonad"
-programmingChats = Title "programming" `Or` Title "haskell" `Or` Title "python"
+lugChats = RE (Title "lug-mgn" `Or` Title "math")
+xmonadChats = RE (Title "xmonad")
+programmingChats = RE (Title "programming" `Or` Title "haskell" `Or` Title "python")

 fullscreenRect = Just $ relBox 0 0 1 1
ViewGit