João Dias
11 lines
341 B
Plaintext
11 lines
341 B
Plaintext
|
|
(deflisten volume_out :initial '{ "volume": "100%" }'
|
|
`sh -c "source './scripts/volume.sh'; get_json_loop"`)
|
|
|
|
(defwidget audio []
|
|
(eventbox
|
|
:onscroll `[[ {} == "up" ]]; sh -c "source './scripts/volume.sh'; increase_vol" || sh -c "source './scripts/volume.sh'; decrease_vol"`
|
|
(button " ${volume_out.volume}")
|
|
)
|
|
)
|