diff options
author | Andrea Rossato <andrea.rossato@unibz.it> | 2008-01-28 01:18:34 +0100 |
---|---|---|
committer | Andrea Rossato <andrea.rossato@unibz.it> | 2008-01-28 01:18:34 +0100 |
commit | 24be430889bace15e5880e3fbffba343f6749e24 (patch) | |
tree | 055e84ee1408b53397f55164d25c1e79692d2c90 | |
parent | db8cbefd952b15d0bce56b142c912118091795d3 (diff) | |
download | xmonad-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.hs | 2 |
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. |