import XMonad.Layout.Spacing
import XMonad.Layout.ThreeColumns
import XMonad.Layout.Spiral
+import XMonad.Layout.NoBorders
+--import XMonad.Layout.Fullscreen
import Data.Ratio
import System.IO
tallLayout = Tall 1 (5/100) (2/3)
spiralLayout = spiral (1 % 1)
-mLayout = spacing 7
+mLayout = spacing 0
$ tallLayout
||| threeColLayout
||| spiralLayout
+ ||| noBorders Full
mStartupHook :: X ()
mStartupHook = do
, className =? "steam" --> doShift "game"
, appName =? "steam.sh" --> doShift "game"
, className =? "steam.sh" --> doShift "game"
- , appName =? "gimp" --> doShift "extra"
]
mWorkspaces = ["mon", "term", "www", "chat", "music", "mail", "game", "code", "extra"]