18 lines
399 B
Text
18 lines
399 B
Text
(defwidget workspaceWidget []
|
|
(box
|
|
:class "workspaces"
|
|
(for workspace in workspaces
|
|
(button
|
|
:style "border-bottom: 4px solid ${workspace.color}"
|
|
:class "${workspace.active ? "focused" : 0}"
|
|
:onclick "swaymsg workspace ${workspace.name}"
|
|
(label :text "${workspace.idx}")
|
|
)
|
|
)
|
|
)
|
|
)
|
|
|
|
(deflisten workspaces
|
|
:initial "[]"
|
|
"bar-ws-monitor"
|
|
)
|