From c2b25b3bf2c1bab4a84de77968a7a2571e7cde2a Mon Sep 17 00:00:00 2001 From: Stefan Ellmauthaler Date: Fri, 12 May 2023 10:03:40 +0200 Subject: [PATCH] Change order of layouts for comm-tab --- users/ellmau/conf/xmonad/xmonad.hs | 2 ++ 1 file changed, 2 insertions(+) diff --git a/users/ellmau/conf/xmonad/xmonad.hs b/users/ellmau/conf/xmonad/xmonad.hs index 4a27771..479ba5a 100644 --- a/users/ellmau/conf/xmonad/xmonad.hs +++ b/users/ellmau/conf/xmonad/xmonad.hs @@ -30,6 +30,7 @@ import XMonad.Layout.Grid import XMonad.Layout.Tabbed import XMonad.Layout.Renamed import XMonad.Layout.ThreeColumns +import XMonad.Layout.PerWorkspace main :: IO () main' :: D.Client -> IO () @@ -37,6 +38,7 @@ main = mkDbusClient >>= main' workSpaces = ["code", "web", "misc", "comm"] ++ map show ([5 .. 9] ++ [0]) layout = smartBorders $ avoidStruts $ + onWorkspace "comm" (threemid ||| tall ||| Mirror tall ||| Grid ||| Full ||| simpleTabbed) $ (tall ||| Mirror tall ||| Grid ||| Full ||| simpleTabbed ||| threemid) where tall = Tall 1 (3/100) (1/2) threemid = renamed [AppendWords "Mid"] $ ThreeColMid 1 (3/100) (1/2)