diff options
author | Ilya Portnov <portnov84@rambler.ru> | 2011-05-14 15:22:32 +0200 |
---|---|---|
committer | Ilya Portnov <portnov84@rambler.ru> | 2011-05-14 15:22:32 +0200 |
commit | 22fbe6b7a3e6af62c35958afb149945a43d3b874 (patch) | |
tree | 37c2e9d64e56ff96c861d12e6fce4af91bf56500 | |
parent | 6aab1acd88ab995350f148393a7e99be80cfffd6 (diff) | |
download | XMonadContrib-22fbe6b7a3e6af62c35958afb149945a43d3b874.tar.gz XMonadContrib-22fbe6b7a3e6af62c35958afb149945a43d3b874.tar.xz XMonadContrib-22fbe6b7a3e6af62c35958afb149945a43d3b874.zip |
Cleanup in X.L.LayoutBuilderP.
Ignore-this: 59d9ce37218424e1bc225a42d71982ab
Remove unused datatype declaration and export usefull typeclass.
darcs-hash:20110514132232-c5067-a40e438b21f60a6c794b8b0ea77c1730b203ce44.gz
-rw-r--r-- | XMonad/Layout/LayoutBuilderP.hs | 9 |
1 files changed, 2 insertions, 7 deletions
diff --git a/XMonad/Layout/LayoutBuilderP.hs b/XMonad/Layout/LayoutBuilderP.hs index 7702a4f..a29a0c9 100644 --- a/XMonad/Layout/LayoutBuilderP.hs +++ b/XMonad/Layout/LayoutBuilderP.hs @@ -16,9 +16,9 @@ module XMonad.Layout.LayoutBuilderP ( LayoutP (..), + Predicate (..), layoutP, layoutAll, - B.relBox, B.absBox, - PropertyRE (..) + B.relBox, B.absBox ) where import Control.Monad @@ -37,11 +37,6 @@ class Predicate p w where alwaysTrue :: w -> p -- ^ A predicate that is always True. First argument is dummy, we always set it to undefined checkPredicate :: p -> w -> X Bool -- ^ Check if given object (window or smth else) matches that predicate --- | A wrapper for X.U.WindowProperties.Property. --- Checks using regular expression. -data PropertyRE = RE Property - deriving (Show,Read,Typeable) - -- | Data type for our layout. data LayoutP p l1 l2 a = LayoutP (Maybe a) (Maybe a) p B.SubBox (Maybe B.SubBox) (l1 a) (Maybe (l2 a)) |