From e2f3a1393658bae1d8c88cacc159a7e4d1a398b8 Mon Sep 17 00:00:00 2001 From: Matthias Schiffer Date: Tue, 16 Feb 2010 11:45:32 +0100 Subject: Added mouse binding and changed layouts --- lib/FullscreenManager.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lib') diff --git a/lib/FullscreenManager.hs b/lib/FullscreenManager.hs index ac1907f..95a6ff2 100644 --- a/lib/FullscreenManager.hs +++ b/lib/FullscreenManager.hs @@ -85,7 +85,7 @@ instance LayoutModifier FullscreenManager Window where -isFloating :: Window -> X (Bool) +isFloating :: Window -> X Bool isFloating w = gets windowset >>= \ws -> return $ M.member w (W.floating ws) -- cgit v1.2.3