Initial bar for work PC

This commit is contained in:
Erwin Boskma 2023-09-29 09:38:26 +02:00
parent 18e4ac1ec3
commit a55b5ed3b8
Signed by: erwin
SSH key fingerprint: SHA256:3F6Cm6I3erRqlBwEghZWAQl6eS5WrGTX1Vs/Evec1lQ

View file

@ -188,13 +188,14 @@
(defwidget title []
(label :text {wm-info.title}))
(defwidget left []
(defwidget left [is-home]
(box :orientation "h"
:halign "start"
:space-evenly false
:spacing 5
(workspaces)
(ha-now-playing)))
(ha-now-playing
:visible is-home)))
(defwidget right []
(box :orientation "h"
@ -216,7 +217,17 @@
:hexpand false
:vexpand false
(centerbox
(left)
(left :is-home true)
(title)
(end))))
(defwidget bar-work-left []
(box :class "eww_bar"
:orientation "h"
:hexpand false
:vexpand false
(centerbox
(left :is-home false)
(title)
(end))))
@ -236,3 +247,16 @@
:vexpand false
:exclusive true
(bar))
(defwindow bar-work
:geometry (geometry :x "0"
:y "0"
:width "100%"
:height "32px"
:anchor "top center")
:stacking "fg"
:monitor 0
:exclusive true
:hexpand false
:vexpand false
(bar-work-left))