From 476dd885d1721a9523ae1f92147dce3e03641e4a Mon Sep 17 00:00:00 2001 From: Dimitri Lozeve Date: Thu, 15 Sep 2022 17:41:24 +0200 Subject: [PATCH] Fix Markdown display --- sncf.ss | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/sncf.ss b/sncf.ss index cfd3e75..9a01e55 100755 --- a/sncf.ss +++ b/sncf.ss @@ -24,7 +24,8 @@ (display-all departures disruptions station-name datetime) (when mattermost-url (let ((tab-str-md - (with-output-to-string (lambda () (display-all departures disruptions station-name datetime))))) + (with-output-to-string + (lambda () (display-all departures disruptions station-name datetime style: 'markdown))))) (post-to-mattermost mattermost-url tab-str-md channel: mattermost-channel)))) (def (parse-arguments args)