22 lines
666 B
Text
22 lines
666 B
Text
(defvar reveal_scratchpad false)
|
|
(defwidget scratchpad []
|
|
(revealer-on-hover
|
|
:revealvar reveal_scratchpad
|
|
:revealvar-name "reveal_scratchpad"
|
|
""
|
|
(scratchpad_children :array scratchpadArray)))
|
|
|
|
(deflisten scratchpadArray :initial "${[1]}"
|
|
'scripts/bar/scratchpad')
|
|
(defwidget scratchpad_children [array]
|
|
(box :orientation "h"
|
|
:space-evenly false
|
|
; :class "workspaces"
|
|
(for entry in array
|
|
(button :onclick 'swaymsg [con_id=${entry.win_id}] focus'
|
|
:tooltip "${entry.name}
|
|
${entry.title}"
|
|
(image :path {entry.icon}
|
|
:image-width 20
|
|
:image-height 20)
|
|
))))
|