Fix a scheme-ism
This commit is contained in:
parent
493e9bc730
commit
7de3f78af6
1 changed files with 3 additions and 3 deletions
|
@ -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
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue