(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}")))))