22 lines
552 B
Plaintext
22 lines
552 B
Plaintext
(deflisten workspaces :initial "" "hyprman -w")
|
|
|
|
(defvar workspaceIcons '{
|
|
"empty": "",
|
|
"full": "",
|
|
"focused": ""
|
|
}')
|
|
|
|
(defwidget hypr_workspaces []
|
|
(box
|
|
:space-evenly true
|
|
(for workspace in workspaces
|
|
(eventbox
|
|
:onclick "hyprctl dispatch workspace ${workspace.id}"
|
|
:tooltip "current: ${workspace.name}"
|
|
(label
|
|
:class "workspace${workspace.active == true ? '--activ' : ''}"
|
|
:text "${workspace.windows > 0 ? workspaceIcons.full : workspaceIcons.empty}")))))
|
|
|
|
|
|
|