diff options
Diffstat (limited to '')
-rw-r--r-- | XMonad/Config/Sjanssen.hs | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/XMonad/Config/Sjanssen.hs b/XMonad/Config/Sjanssen.hs index a2676e2..539a4c0 100644 --- a/XMonad/Config/Sjanssen.hs +++ b/XMonad/Config/Sjanssen.hs @@ -14,6 +14,7 @@ import XMonad.Hooks.ManageHelpers (isFullscreen, doFullFloat) import XMonad.Hooks.EwmhDesktops import XMonad.Prompt import XMonad.Actions.SpawnOn +import XMonad.Util.SpawnOnce import XMonad.Layout.LayoutScreens import XMonad.Layout.TwoPane @@ -37,12 +38,19 @@ sjanssenConfig = , ("Amarokapp", "7")]] <+> manageHook defaultConfig <+> manageDocks <+> manageSpawn <+> (isFullscreen --> doFullFloat) + , startupHook = mapM_ spawnOnce spawns } where tiled = HintedTile 1 0.03 0.5 TopLeft layouts = (tiled Tall ||| (tiled Wide ||| Full)) ||| tabbed shrinkText myTheme modifiers = avoidStruts . smartBorders + spawns = [ "xmobar" + , "xset -b", "xset s off", "xset dpms 0 600 1200" + , "nitrogen --set-tiled wallpaper/wallpaper.jpg" + , "trayer --transparent true --expand true --align right " + ++ "--edge bottom --widthtype request" ] + mykeys (XConfig {modMask = modm}) = M.fromList $ [((modm, xK_p ), shellPromptHere myPromptConfig) ,((modm .|. shiftMask, xK_Return), spawnHere =<< asks (terminal . config)) |