ryuslash/legacy-dotfiles
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Update mowedline background

Browse source
This commit is contained in:
Tom Willemse 2015-08-17 21:59:24 +02:00
parent f4f7f4fa3b
commit 3062fcae60
1 changed files with 7 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
mowedline/.config/mowedline/init.scm
View file

@ -52,26 +52,26 @@
'margin-bottom 15 'margin-bottom 15
'margin-left 15 'margin-left 15
'margin-right 15 'margin-right 15
'background 'inherit 'background 'transparent
(widget:text 'name "taglist" (widget:text 'name "taglist"
'format (compose string-maybe-pad-left tag-list-formatter) 'format (compose string-maybe-pad-left tag-list-formatter)
'background-color "#3d3d3d") 'background-color "#111111")
(widget:spacer 'flex 1) (widget:spacer 'flex 1)
(widget:text 'name "mpd" (widget:text 'name "mpd"
'format (add-fa-icon "") 'format (add-fa-icon "")
'background-color "#3d3d3d") 'background-color "#111111")
(widget:spacer 'width 5) (widget:spacer 'width 5)
(widget:text 'name "irclist" (widget:text 'name "irclist"
'background-color "#3d3d3d") 'background-color "#111111")
(widget:spacer 'width 5) (widget:spacer 'width 5)
(widget:text 'name "email" (widget:text 'name "email"
'format (compose text-maybe-pad-both (add-fa-icon "")) 'format (compose text-maybe-pad-both (add-fa-icon ""))
'background-color "#3d3d3d") 'background-color "#111111")
(widget:spacer 'width 5) (widget:spacer 'width 5)
(widget:flags 'name "keychain" (widget:flags 'name "keychain"
'font "FontAwesome-10" 'font "FontAwesome-10"
'flags '(("Unlocked" . "") 'flags '(("Unlocked" . "")
("Locked" . "")) ("Locked" . ""))
'background-color "#3d3d3d") 'background-color "#111111")
(widget:spacer 'width 5) (widget:spacer 'width 5)
(widget:clock 'background-color "#3d3d3d")) (widget:clock))