From 57f84fadc1b8da38f890cf988cb638c90aeb32ea Mon Sep 17 00:00:00 2001
From: Ingolf Wagner <contact@ingolf-wagner.de>
Date: Tue, 12 Nov 2019 22:31:59 +0100
Subject: [PATCH] xmonad: better tabs

---
 system/desktop/home-manager/xmonad/Main.hs | 8 +++-----
 1 file changed, 3 insertions(+), 5 deletions(-)

diff --git a/system/desktop/home-manager/xmonad/Main.hs b/system/desktop/home-manager/xmonad/Main.hs
index e5f1222..0985080 100644
--- a/system/desktop/home-manager/xmonad/Main.hs
+++ b/system/desktop/home-manager/xmonad/Main.hs
@@ -43,7 +43,7 @@ import           XMonad.Layout.ResizableTile      (MirrorResize (MirrorExpand, M
                                                    ResizableTall (..))
 import           XMonad.Layout.Simplest           (Simplest (..))
 import           XMonad.Layout.Tabbed             (TabbedDecoration, addTabs,
-                                                   addTabsAlways, shrinkText)
+                                                   shrinkText)
 import           XMonad.Layout.WindowNavigation   (configurableNavigation,
                                                    noNavigateBorders)
 import           XMonad.Prompt                    (XPConfig (..))
@@ -75,8 +75,6 @@ nonSelectionColor = Solarized.base02
 
 -- http://hackage.haskell.org/package/xmonad-contrib-0.15/docs/XMonad-Layout-Tabbed.html#t:Theme
 myLayout =  (windowConfiguration $ myTabbed $ mySubLayout $ boringWindows resizeableTall) ||| noBorders Full
--- needed for rebuild sometimes
--- myLayout = dwmStyle shrinkText def ( layoutHook def ) ||| noBorders Full
   where
     resizeableTall = ResizableTall nmaster delta ratio []
      -- The default number of windows in the master pane
@@ -88,11 +86,11 @@ myLayout =  (windowConfiguration $ myTabbed $ mySubLayout $ boringWindows resize
 
     windowConfiguration = configurableNavigation noNavigateBorders
 
-    myTabbed x = smartBorders $ addTabsAlways shrinkText tabDecoration x
+    myTabbed x = smartBorders $ addTabs shrinkText windowDecoration x
 
     mySubLayout = subLayout [] Simplest
 
-    tabDecoration = def { activeColor = selectionColor
+    windowDecoration = def { activeColor = selectionColor
                         , activeBorderColor = selectionColor
                         , activeTextColor = Solarized.base03
                         , inactiveColor = nonSelectionColor