mirror of
https://github.com/GeorgeSG/dotfiles.git
synced 2026-09-06 09:28:45 +00:00
31 lines
433 B
Plaintext
31 lines
433 B
Plaintext
(defpoll date-time :interval "5s" "./lib/date-time.sh")
|
|
|
|
(defwidget date []
|
|
(box :class "date"
|
|
"${date-time.date}"
|
|
)
|
|
)
|
|
|
|
(defwidget day []
|
|
(box :class "day"
|
|
"${date-time.day}"
|
|
)
|
|
)
|
|
|
|
(defwidget time []
|
|
(box :class "time"
|
|
"${date-time.time}"
|
|
)
|
|
)
|
|
|
|
(defwidget clock-tray-item []
|
|
(box :class "clock-tray-item"
|
|
:orientation "h"
|
|
:space-evenly false
|
|
:valign "center"
|
|
(date)
|
|
(day)
|
|
(time)
|
|
)
|
|
)
|