From 885271470ee0c4c91aa303e0c84bb46d398a3da9 Mon Sep 17 00:00:00 2001 From: Spencer Janssen Date: Wed, 3 Oct 2007 18:13:05 +0200 Subject: Float Gimp too darcs-hash:20071003161305-a5988-02dfb79c0d217f0c0426a9999540aff5f970e4c6.gz --- Config.hs | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/Config.hs b/Config.hs index 7f99def..c786ad5 100644 --- a/Config.hs +++ b/Config.hs @@ -67,8 +67,9 @@ defaultGaps = [(0,0,0,0)] -- 15 for default dzen -- managing a new window. manageHook :: Window -> (String, String, String) -> X (WindowSet -> WindowSet) --- Float mplayer windows: -manageHook w (_, _, "MPlayer") = do (_, rr) <- floatLocation w; return (W.float w rr) +-- Float various windows: +manageHook w (_, _, c) | c `elem` floats = do (_, rr) <- floatLocation w; return (W.float w rr) + where floats = ["MPlayer", "Gimp"] -- Don't manage various panels and desktop windows: manageHook w (_, c, _) | c `elem` ignore = reveal w >> return (W.delete w) -- cgit v1.2.3