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