aboutsummaryrefslogtreecommitdiffstats
path: root/XMonad/Layout/TabBarDecoration.hs
diff options
context:
space:
mode:
Diffstat (limited to 'XMonad/Layout/TabBarDecoration.hs')
-rw-r--r--XMonad/Layout/TabBarDecoration.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/XMonad/Layout/TabBarDecoration.hs b/XMonad/Layout/TabBarDecoration.hs
index 9339a64..5305428 100644
--- a/XMonad/Layout/TabBarDecoration.hs
+++ b/XMonad/Layout/TabBarDecoration.hs
@@ -75,4 +75,4 @@ instance Eq a => DecorationStyle TabBarDecoration a where
ny = case p of
Top -> y
Bottom -> y + fi ht - fi dht
- nx = maybe x (fi . loc) $ w `elemIndex` wrs
+ nx = (x +) $ maybe 0 (fi . loc) $ w `elemIndex` wrs