diff options
| author | Ismael Carnales <icarnales@gmail.com> | 2009-03-01 06:15:09 +0100 |
|---|---|---|
| committer | Ismael Carnales <icarnales@gmail.com> | 2009-03-01 06:15:09 +0100 |
| commit | 19f3604c0b6cf621ce96201a2290d6e5f200f55a (patch) | |
| tree | a10b57e8c5a97bc1eabd46b4558689f214222232 | |
| parent | ca2ff24a2ae3e2566c782a55879174ec47210090 (diff) | |
| download | XMonadContrib-19f3604c0b6cf621ce96201a2290d6e5f200f55a.tar.gz XMonadContrib-19f3604c0b6cf621ce96201a2290d6e5f200f55a.tar.xz XMonadContrib-19f3604c0b6cf621ce96201a2290d6e5f200f55a.zip | |
X.L.Master: fix number of windows
Ignore-this: 2af132159450d4fb72eb52024eda71b5
darcs-hash:20090301051509-6553f-f3807ddb03c277cdf54443d282a2a1a01a1313f8.gz
| -rw-r--r-- | XMonad/Layout/Master.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/XMonad/Layout/Master.hs b/XMonad/Layout/Master.hs index dfa1633..2fcce18 100644 --- a/XMonad/Layout/Master.hs +++ b/XMonad/Layout/Master.hs @@ -76,7 +76,7 @@ applyMaster :: (LayoutClass l Window) => applyMaster _ frac wksp rect = do let st= S.stack wksp let ws = S.integrate' $ st - if length ws > 2 then do + if length ws > 1 then do let m = head ws let (mr, sr) = splitHorizontallyBy frac rect let nst = st>>= S.filter (m/=) |