ellmau/nixos
1
0
Fork 0
mirror of https://github.com/ellmau/nixos.git synced 2025-12-19 09:29:36 +01:00
Code Issues Projects Releases Wiki Activity

Change order of layouts for comm-tab

Browse Source
This commit is contained in:
Stefan Ellmauthaler 2023-05-12 10:03:40 +02:00
parent 005430c902
commit c2b25b3bf2
Failed to extract signature
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
users/ellmau/conf/xmonad/xmonad.hs
View File

@ -30,6 +30,7 @@ import XMonad.Layout.Grid
import XMonad.Layout.Tabbed import XMonad.Layout.Tabbed
import XMonad.Layout.Renamed import XMonad.Layout.Renamed
import XMonad.Layout.ThreeColumns import XMonad.Layout.ThreeColumns
import XMonad.Layout.PerWorkspace
main :: IO () main :: IO ()
main' :: D.Client -> IO () main' :: D.Client -> IO ()
@ -37,6 +38,7 @@ main = mkDbusClient >>= main'
workSpaces = ["code", "web", "misc", "comm"] ++ map show ([5 .. 9] ++ [0]) workSpaces = ["code", "web", "misc", "comm"] ++ map show ([5 .. 9] ++ [0])
layout = smartBorders $ avoidStruts $ layout = smartBorders $ avoidStruts $
onWorkspace "comm" (threemid ||| tall ||| Mirror tall ||| Grid ||| Full ||| simpleTabbed) $
(tall ||| Mirror tall ||| Grid ||| Full ||| simpleTabbed ||| threemid) (tall ||| Mirror tall ||| Grid ||| Full ||| simpleTabbed ||| threemid)
where tall = Tall 1 (3/100) (1/2) where tall = Tall 1 (3/100) (1/2)
threemid = renamed [AppendWords "Mid"] $ ThreeColMid 1 (3/100) (1/2) threemid = renamed [AppendWords "Mid"] $ ThreeColMid 1 (3/100) (1/2)