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

Remove spacers

Browse source
This commit is contained in:
Tom Willemse 2016-06-17 01:31:14 +02:00
parent ec21b78114
commit 2123187afa
1 changed files with 0 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

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

@ -50,12 +50,9 @@
(widget:spacer 'flex 1) (widget:spacer 'flex 1)
(widget:text 'name "mpd" (widget:text 'name "mpd"
'format (add-fa-icon "")) 'format (add-fa-icon ""))
(widget:spacer 'width 5)
(widget:text 'name "irclist" 'format identity) (widget:text 'name "irclist" 'format identity)
(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 "")))
(widget:spacer 'width 5)
(widget:flags 'name "cam-status" (widget:flags 'name "cam-status"
'font "FontAwesome-10" 'font "FontAwesome-10"
'flags '(("suspended" color "#a88654" "") 'flags '(("suspended" color "#a88654" "")
@ -65,5 +62,4 @@
'font "FontAwesome-10" 'font "FontAwesome-10"
'flags '(("Unlocked" color "#65a854" "") 'flags '(("Unlocked" color "#65a854" "")
("Locked" color "#a85454" ""))) ("Locked" color "#a85454" "")))
(widget:spacer 'width 5)
(widget:clock)) (widget:clock))