diff options
Diffstat (limited to '')
-rw-r--r-- | module/output/terminal.scm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/module/output/terminal.scm b/module/output/terminal.scm index fd870369..0e5a1910 100644 --- a/module/output/terminal.scm +++ b/module/output/terminal.scm @@ -116,11 +116,13 @@ (let ((start (attr ev 'DTSTART))) (if (datetime? start) (string-append (date->string (get-date start)) + " " (time->string (get-time start))) (date->string start))) (let ((end (attr ev 'DTEND))) (if (datetime? end) (string-append (date->string (get-date end)) + " " (time->string (get-time end))) (date->string end))) (unlines (take-to (flow-text (or (attr ev 'DESCRIPTION) "") |