aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorIlya Portnov <portnov84@rambler.ru>2011-05-14 15:22:32 +0200
committerIlya Portnov <portnov84@rambler.ru>2011-05-14 15:22:32 +0200
commit22fbe6b7a3e6af62c35958afb149945a43d3b874 (patch)
tree37c2e9d64e56ff96c861d12e6fce4af91bf56500
parent6aab1acd88ab995350f148393a7e99be80cfffd6 (diff)
downloadXMonadContrib-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.hs9
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))