18 lines
376 B
Text
18 lines
376 B
Text
|
(defwidget workspaceWidget []
|
||
|
(box
|
||
|
:class "workspaces"
|
||
|
(for workspace in workspaces
|
||
|
(button
|
||
|
:class "${workspace.urgent ? "urgent" : ""} ${workspace.focused ? "focused" : 0}"
|
||
|
:onclick "swaymsg workspace ${workspace.name}"
|
||
|
(label :text "${workspace.name}")
|
||
|
)
|
||
|
)
|
||
|
)
|
||
|
)
|
||
|
|
||
|
(deflisten workspaces
|
||
|
:initial "[]"
|
||
|
"bar-ws-monitor"
|
||
|
)
|