(defwidget workspaces []
  (eventbox
		:onscroll "echo {} | sed -e \"s/up/-1/g\" -e \"s/down/+1/g\" | xargs hyprctl dispatch workspace"
		(box
			:class "module workspaces"
			:spacing 10
		  (for i in workspace
		    (button
					:onclick "hyprctl dispatch workspace ${i.number}"
					:class "ws"
					:style "color: ${i.color};"
					"●")))))
(deflisten workspace "./scripts/workspace")