summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorMatthias Schiffer <mschiffer@universe-factory.net>2013-09-17 04:15:48 +0200
committerMatthias Schiffer <mschiffer@universe-factory.net>2013-09-17 04:15:48 +0200
commit7754569f8978dff5c7f6304295cafa487c42d318 (patch)
treec8001534c1b80d3f99d85fed79bd754b1db76177
parentc04271bf6b9126f635b9b9baf173b2af5380fd84 (diff)
downloadmetatile-7754569f8978dff5c7f6304295cafa487c42d318.tar
metatile-7754569f8978dff5c7f6304295cafa487c42d318.zip
Fix documentation for the sink function
-rw-r--r--MetaTile/Layout/Floating.hs2
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)