refactor of yuck files

This commit is contained in:
2025-03-06 21:56:38 +01:00
parent 8c4a2bf572
commit 6bab674c4d
4 changed files with 65 additions and 52 deletions

View File

@@ -1,7 +1,8 @@
(defwidget datetime []
(box :class "datetime"
:halign "center"
:valign "center"
(box
:class "datetime"
:halign "center"
:valign "center"
{ time == ''
? ''
: time
@@ -10,8 +11,9 @@
)
(defvar time-visible false)
(defpoll time :interval "1s"
:initial "initial-value" ; optional, defaults to poll at startup
:run-while time-visible ; optional, defaults to 'true'
(defpoll time
:interval "1s"
:initial "initial-value" ; optional, defaults to poll at startup
:run-while time-visible ; optional, defaults to 'true'
`date +"%H:%M - %a, %d %b"` ; https://www.man7.org/linux/man-pages/man1/date.1.html
)