Candyrice/yuck/panel/panel_workspaces/leftwm_ws.yuck

;This widget and code are specific for LeftWM

; Icons for individual tags
(defwidget panel_leftwm_ws_ico [h tag]
	(button
		:halign "center"
		:valign "center"
		:height "${h}"
		:width	"24"
		:active	true
		:class	"panel_ws_ico ${tag.mine ? 'panel_ws_ico_cur' : 'panel_ws_ico_notcur'} ${tag.busy ? 'panel_ws_ico_act' : 'panel_ws_ico_inact'}"
		:onclick "leftwm-command \"SendWorkspaceToTag 0 ${tag.index}\""
		:timeout "300ms"
		{tag.mine ? '' : tag.busy ? '' : ''}
	)
)

; LeftWM work-space widget showing all tags
(defwidget panel_ws_leftwm [h]
	(box
		:class	"panel_workspaces_widg"
		:halign "center"
		:valign	"center"
		:height	"${h}"
		:active	true
		
		(for tag in '${leftwm_state.workspaces[0].tags}'
			(panel_leftwm_ws_ico	:h "${h}" :tag {tag})
		)
	)
)