Candyrice/yuck/panel/panel_workspaces/leftwm_ws.yuck

31 lines
775 B
Plaintext

;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})
)
)
)