diff options
-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/=) |