9 lines
145 B
Text
9 lines
145 B
Text
|
(defpoll time :interval "60s"
|
||
|
|
:initial "initial-value"
|
||
|
|
`date +%H:%M`)
|
||
|
|
|
||
|
|
(defwidget time []
|
||
|
|
(box
|
||
|
|
:class "time"
|
||
|
|
(label
|
||
|
|
:text time)))
|