João Dias
13 lines
225 B
Plaintext
13 lines
225 B
Plaintext
|
|
(defpoll datetime :interval "10s"
|
|
"date +'%A %d, %H:%M'")
|
|
|
|
(defvar calendar_state "hidden")
|
|
|
|
(defwidget clock []
|
|
(box :class "clock"
|
|
(button :onclick "sh ./scripts/display-calendar.sh"
|
|
"${datetime}")
|
|
)
|
|
)
|