aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorAndrea Rossato <andrea.rossato@unibz.it>2008-01-28 01:18:34 +0100
committerAndrea Rossato <andrea.rossato@unibz.it>2008-01-28 01:18:34 +0100
commit24be430889bace15e5880e3fbffba343f6749e24 (patch)
tree055e84ee1408b53397f55164d25c1e79692d2c90
parentdb8cbefd952b15d0bce56b142c912118091795d3 (diff)
downloadxmonad-24be430889bace15e5880e3fbffba343f6749e24.tar.gz
xmonad-24be430889bace15e5880e3fbffba343f6749e24.tar.xz
xmonad-24be430889bace15e5880e3fbffba343f6749e24.zip
Make Mirror implement emptyLayout
darcs-hash:20080128001834-32816-0216ea86f243e76d5918ea15c7d2306496878b7a.gz
-rw-r--r--XMonad/Layout.hs2
1 files changed, 2 insertions, 0 deletions
diff --git a/XMonad/Layout.hs b/XMonad/Layout.hs
index 981541c..94051b2 100644
--- a/XMonad/Layout.hs
+++ b/XMonad/Layout.hs
@@ -136,6 +136,8 @@ instance LayoutClass l a => LayoutClass (Mirror l) a where
doLayout (Mirror l) r s = (map (second mirrorRect) *** fmap Mirror)
`fmap` doLayout l (mirrorRect r) s
handleMessage (Mirror l) = fmap (fmap Mirror) . handleMessage l
+ emptyLayout (Mirror l) r = (map (second mirrorRect) *** fmap Mirror)
+ `fmap` emptyLayout l (mirrorRect r)
description (Mirror l) = "Mirror "++ description l
-- | tile. Compute the positions for windows using the default 2 pane tiling algorithm.