From 22f0e93dbe080786ed97afe10f6886b48d684a9c Mon Sep 17 00:00:00 2001
From: Lukas Mai <l.mai@web.de>
Date: Wed, 26 Mar 2008 18:28:44 +0100
Subject: XMonad.Layout.NoBorders: fix floating fullscreen logic

darcs-hash:20080326172844-462cf-08fd02f2fafb0978c1020ca182e6be49e808b6f5.gz
---
 XMonad/Layout/NoBorders.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'XMonad/Layout/NoBorders.hs')

diff --git a/XMonad/Layout/NoBorders.hs b/XMonad/Layout/NoBorders.hs
index ec7de5c..ad55ea8 100644
--- a/XMonad/Layout/NoBorders.hs
+++ b/XMonad/Layout/NoBorders.hs
@@ -87,7 +87,7 @@ instance LayoutModifier SmartBorder Window where
                 [ w |
                     (w, W.RationalRect px py wx wy) <- M.toList . W.floating $ wset,
                     px <= 0, py <= 0,
-                    wx >= 1, wy >= 1
+                    wx + px >= 1, wy + py >= 1
                 ]
         asks (borderWidth . config) >>= setBorders (s \\ ws)
         setBorders ws 0
-- 
cgit v1.2.3