From f2f801cf981471643c7a1fb5fc9da9d75aae1592 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= Date: Fri, 14 Feb 2020 11:06:44 +0100 Subject: Add missing spaces in terminal output. --- module/output/terminal.scm | 2 ++ 1 file changed, 2 insertions(+) (limited to 'module') 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) "") -- cgit v1.2.3