More xmonad tweaks
Getty Ritter
8 years ago
| 104 | 104 | XM.avoidStruts tiled ||| |
| 105 | 105 | XM.avoidStruts (XM.Mirror tiled) ||| |
| 106 | 106 | XM.noBorders (XM.smartBorders XM.Full) ||| |
| 107 |
XM.avoidStruts |
|
| 107 | XM.avoidStruts tabbed | |
| 108 | 108 | , XM.manageHook = |
| 109 | 109 | XM.manageDocks <+> XM.manageHook def |
| 110 | 110 | , XM.normalBorderColor = normalC |
| 116 | 116 | } |
| 117 | 117 | } |
| 118 | 118 | tiled = XM.Tall 1 (3/100) (3/5) |
| 119 |
tabbed = Tab.tabbed |
|
| 119 | tabbed = Tab.tabbedAlways Tab.shrinkText def | |
| 120 | 120 | { Tab.activeColor = focusedC |
| 121 | 121 | , Tab.inactiveColor = normalC |
| 122 | 122 | , Tab.activeBorderColor = blackC |
| 123 | 123 | , Tab.inactiveBorderColor = blackC |
| 124 | 124 | , Tab.activeTextColor = whiteC |
| 125 | 125 | , Tab.inactiveTextColor = whiteC |
| 126 | , Tab.fontName = "Inconsolata" | |
| 127 | 126 | } |
| 128 | 127 | |
| 129 | 128 | main :: IO () |