user/eww: add linebar
This commit is contained in:
parent
1e80b3f543
commit
26d248d971
4 changed files with 86 additions and 1 deletions
|
|
@ -1,3 +1,14 @@
|
|||
(defwindow linebar :monitor 0
|
||||
:geometry (geometry :x "35px"
|
||||
:y "0%"
|
||||
:width "100%"
|
||||
:height "2px"
|
||||
:anchor "top center")
|
||||
:stacking "fg"
|
||||
:windowtype "dock"
|
||||
:wm-ignore false
|
||||
(wlinebar))
|
||||
|
||||
(defwindow mainbar :monitor 0
|
||||
:geometry (geometry :x "0%"
|
||||
:y "0%"
|
||||
|
|
@ -24,6 +35,7 @@
|
|||
`date "+:%S"`)
|
||||
|
||||
(deflisten lworkspaces "./scripts/workspaces.sh")
|
||||
(deflisten llineworkspaces "./scripts/line-workspaces.sh")
|
||||
(deflisten ltitle "./scripts/title.sh")
|
||||
|
||||
(defwidget bar []
|
||||
|
|
@ -34,9 +46,16 @@
|
|||
(title)
|
||||
(time))))
|
||||
|
||||
(defwidget wlinebar []
|
||||
(eventbox :onscroll "./scripts/scroll.sh {}"
|
||||
(line_workspaces)))
|
||||
|
||||
(defwidget workspaces []
|
||||
(literal :content lworkspaces))
|
||||
|
||||
(defwidget line_workspaces []
|
||||
(literal :content llineworkspaces))
|
||||
|
||||
(defwidget title []
|
||||
(literal :content ltitle))
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue