diff options
| -rw-r--r-- | TODO | 6 | ||||
| -rw-r--r-- | module/vulgar/components.scm | 5 |
2 files changed, 2 insertions, 9 deletions
@@ -6,12 +6,6 @@ XDG_CONFIG_HOME Liknande för cache, genererade filer, med mera Både när programmet körs som användare och som systemtjänst. -Terminal -======== - -Handle systems with bad `cal' programs --------------------------------------- - HTML ==== diff --git a/module/vulgar/components.scm b/module/vulgar/components.scm index 3909d63f..2b018e4e 100644 --- a/module/vulgar/components.scm +++ b/module/vulgar/components.scm @@ -11,8 +11,7 @@ ;; testing the functionality. This seems to at least give me ;; an (almost) working display, albeit ugly. (if (file-exists? "/usr/bin/ncal") - (system* "ncal" "-3" "-H" (format #f "~a-~a-~a" - year month day) - month year) + (system* "ncal" "-3" "-H" (date->string date) + month year) (system* "cal" "-3" day month year)))) |