diff options
| -rw-r--r-- | MetaTile/Layout/Floating.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/MetaTile/Layout/Floating.hs b/MetaTile/Layout/Floating.hs index 48abc7f..ac306d3 100644 --- a/MetaTile/Layout/Floating.hs +++ b/MetaTile/Layout/Floating.hs @@ -76,7 +76,7 @@ float w = do XS.modify $ \(FloatingStorage fw) -> FloatingStorage (M.insert w r fw) refresh --- | Make a tiled window floating, using its suggested rectangle +-- | Clear the floating status of a window sink :: Window -> X () sink w = do XS.modify $ \(FloatingStorage fw) -> FloatingStorage (M.delete w fw) |