diff options
| -rw-r--r-- | XMonad/Config/Sjanssen.hs | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/XMonad/Config/Sjanssen.hs b/XMonad/Config/Sjanssen.hs index 40aab8b..4b1941c 100644 --- a/XMonad/Config/Sjanssen.hs +++ b/XMonad/Config/Sjanssen.hs @@ -3,8 +3,9 @@ module XMonad.Config.Sjanssen (sjanssenConfig) where import XMonad import qualified XMonad.StackSet as W -import XMonad.Layouts +import XMonad.Layouts hiding (Tall) import XMonad.Layout.Tabbed +import XMonad.Layout.HintedTile import XMonad.Operations import XMonad.Config (defaultConfig) import XMonad.Layout.NoBorders @@ -31,14 +32,17 @@ sjanssenConfig = do , ((modm, button2), (\w -> focus w >> windows W.swapMaster)) , ((modm.|. shiftMask, button1), (\w -> focus w >> mouseResizeWindow w)) ] , keys = \c -> mykeys c `M.union` keys defaultConfig c - , layoutHook = smartBorders (tiled ||| Mirror tiled ||| Full ||| tabbed shrinkText defaultTConf) + , layoutHook = smartBorders (tiled Tall ||| tiled Wide ||| Full ||| tabbed shrinkText myTConf) } where - tiled = Tall 1 0.03 0.5 + tiled = HintedTile 1 0.03 0.5 mykeys (XConfig {modMask = modm}) = M.fromList $ [((modm, xK_p ), shellPrompt myPromptConfig)] + myFont = "xft:Bitstream Vera Sans Mono:pixelsize=10" + myTConf = defaultTConf { fontName = myFont } myPromptConfig = defaultXPConfig { position = Top + , font = myFont , promptBorderWidth = 0 } |