aboutsummaryrefslogtreecommitdiffstats
path: root/XMonad/Config/Sjanssen.hs
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--XMonad/Config/Sjanssen.hs8
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))