aboutsummaryrefslogtreecommitdiffstats
path: root/XMonad
diff options
context:
space:
mode:
authordaniel <daniel@wagner-home.com>2008-03-21 11:44:41 +0100
committerdaniel <daniel@wagner-home.com>2008-03-21 11:44:41 +0100
commitefefb727b8c35bcf2bb98cb136a7e992d9b00c5f (patch)
tree4c9d005bca3fec40ad633b0a3e7014aec8a258d0 /XMonad
parente0d6d130d309302f13ec7482bad6a60f766d1342 (diff)
downloadXMonadContrib-efefb727b8c35bcf2bb98cb136a7e992d9b00c5f.tar.gz
XMonadContrib-efefb727b8c35bcf2bb98cb136a7e992d9b00c5f.tar.xz
XMonadContrib-efefb727b8c35bcf2bb98cb136a7e992d9b00c5f.zip
a magnifier that defaults to not magnifying any windows
darcs-hash:20080321104441-c98ca-e467670cf8efbd3ad8f5d0e41ec09c9e0ceedcd4.gz
Diffstat (limited to 'XMonad')
-rw-r--r--XMonad/Layout/Magnifier.hs5
1 files changed, 5 insertions, 0 deletions
diff --git a/XMonad/Layout/Magnifier.hs b/XMonad/Layout/Magnifier.hs
index a153909..d7e73aa 100644
--- a/XMonad/Layout/Magnifier.hs
+++ b/XMonad/Layout/Magnifier.hs
@@ -22,6 +22,7 @@ module XMonad.Layout.Magnifier
-- $usage
magnifier,
magnifier',
+ magnifierOff,
magnifiercz,
magnifiercz',
MagnifyMsg (..)
@@ -78,6 +79,10 @@ magnifiercz cz = ModifiedLayout (Mag ((fromRational cz)*1.0::Double) On All)
magnifier' :: l a -> ModifiedLayout Magnifier l a
magnifier' = ModifiedLayout (Mag 1.5 On NoMaster)
+-- | Magnifier that defaults to Off
+magnifierOff :: l a -> ModifiedLayout Magnifier l a
+magnifierOff = ModifiedLayout (Mag 1.5 Off All)
+
-- | Increase the size of the window that has focus by a custom zoom,
-- unless if it is the master window.
magnifiercz' :: Rational -> l a -> ModifiedLayout Magnifier l a