aboutsummaryrefslogtreecommitdiffstats
path: root/XMonad/Layout
diff options
context:
space:
mode:
authorBraden Shepherdson <Braden.Shepherdson@gmail.com>2008-03-05 23:23:02 +0100
committerBraden Shepherdson <Braden.Shepherdson@gmail.com>2008-03-05 23:23:02 +0100
commitcf7f8956062695046f96442b0058c224c3ca214f (patch)
tree5e3590b6f2697f07e651c2d5148b1cb544126f17 /XMonad/Layout
parentab37895919f1d2124aae08b049b8010c199dfa3e (diff)
downloadXMonadContrib-cf7f8956062695046f96442b0058c224c3ca214f.tar.gz
XMonadContrib-cf7f8956062695046f96442b0058c224c3ca214f.tar.xz
XMonadContrib-cf7f8956062695046f96442b0058c224c3ca214f.zip
Fix ToggleOff: It was adding 0.1 to the magnification.
darcs-hash:20080305222302-d53a8-7c2da98e774ebd47e2004c37b8b51f89ca39767a.gz
Diffstat (limited to 'XMonad/Layout')
-rw-r--r--XMonad/Layout/Magnifier.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/XMonad/Layout/Magnifier.hs b/XMonad/Layout/Magnifier.hs
index b163fe4..1a69a7b 100644
--- a/XMonad/Layout/Magnifier.hs
+++ b/XMonad/Layout/Magnifier.hs
@@ -106,7 +106,7 @@ instance LayoutModifier Magnifier Window where
handleMess (Mag z On t) m
| Just MagnifyMore <- fromMessage m = return . Just $ (Mag (z + 0.1) On t)
| Just MagnifyLess <- fromMessage m = return . Just $ (Mag (z - 0.1) On t)
- | Just ToggleOff <- fromMessage m = return . Just $ (Mag (z + 0.1) Off t)
+ | Just ToggleOff <- fromMessage m = return . Just $ (Mag (z ) Off t)
handleMess (Mag z Off t) m
| Just ToggleOn <- fromMessage m = return . Just $ (Mag z On t)
handleMess _ _ = return Nothing