Trayer and xscreensaver configuration
This commit is contained in:
parent
e8c0385a8d
commit
99c7cc64fe
2 changed files with 3 additions and 1 deletions
|
|
@ -6,4 +6,4 @@ Config { bgColor = "#425F57"
|
||||||
, Run XMonadLog
|
, Run XMonadLog
|
||||||
]
|
]
|
||||||
, alignSep = "}{"
|
, alignSep = "}{"
|
||||||
, template = " %XMonadLog% }{ %date% "}
|
, template = " %XMonadLog% }{ %date% "}
|
||||||
|
|
|
||||||
|
|
@ -37,6 +37,8 @@ myStartupHook :: X ()
|
||||||
myStartupHook = do
|
myStartupHook = do
|
||||||
spawn $ "/usr/bin/xmobar " ++ themeBarConfig myTheme
|
spawn $ "/usr/bin/xmobar " ++ themeBarConfig myTheme
|
||||||
spawn $ "feh --bg-scale " ++ themeWallpaper myTheme
|
spawn $ "feh --bg-scale " ++ themeWallpaper myTheme
|
||||||
|
spawn "xscreensaver -no-splash"
|
||||||
|
spawn "trayer --edge top --align right --SetDockType true --SetPartialStrut true --expand true --width 10 --transparent true --tint 0x5f5f5f --height 31"
|
||||||
|
|
||||||
myKeybindings :: [(String, X())]
|
myKeybindings :: [(String, X())]
|
||||||
myKeybindings = [ ("M-e", spawn myEmacs)
|
myKeybindings = [ ("M-e", spawn myEmacs)
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue