Fix a scheme-ism

This commit is contained in:
BirDt_ 2025-09-27 10:42:06 +08:00
parent 493e9bc730
commit 7de3f78af6

View file

@ -87,7 +87,7 @@
"No connection to weather service :(")))
(defun default-dash ()
"Returns the default dashboard."
"Return the default dashboard."
`(:content ,(concat
enlight-calendar "\n\n"
(grid-make-row
@ -128,7 +128,7 @@
))
(defun android-dash ()
"Returns the android dashboard."
"Return the android dashboard."
`(:content ,(concat
(grid-make-row
(list (grid-make-column (grid-make-box `(:content ,(concat
@ -171,7 +171,7 @@
"Gets the dashboard content for the current platform."
(cond
((equal system-type 'android) (android-dash))
(else (default-dash))))
(t (default-dash))))
;; Dashboard screen using enlight