diff options
| author | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-08-26 20:37:46 +0200 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-08-26 20:39:11 +0200 |
| commit | 8171ba98a3df7d9d2cfc1489ef4ae363816e56bf (patch) | |
| tree | 05bdabfa5a61c254f209bf9d0b532a3f9b77d26d | |
| parent | Bump version. (diff) | |
| download | calp-8171ba98a3df7d9d2cfc1489ef4ae363816e56bf.tar.gz calp-8171ba98a3df7d9d2cfc1489ef4ae363816e56bf.tar.xz | |
Fix ncal.
| -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)))) |