From ba9c00d2a247a301778b7f914dd26f637646b8eb Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= Date: Mon, 20 Apr 2020 02:27:36 +0200 Subject: map takes 2 arguments... --- module/datetime/zic.scm | 11 ++++++----- 1 file changed, 6 insertions(+), 5 deletions(-) (limited to 'module') diff --git a/module/datetime/zic.scm b/module/datetime/zic.scm index e5ba8792..ca8e7e17 100644 --- a/module/datetime/zic.scm +++ b/module/datetime/zic.scm @@ -20,11 +20,12 @@ (define-public (read-zoneinfo . ports-or-filenames) (parsed-zic->zoneinfo - (concatenate (map (lambda (port-or-filename) - (if (port? port-or-filename) - (parse-zic-file port-or-filename) - (call-with-input-file port-or-filename parse-zic-file)))) - ports-or-filenames))) + (concatenate + (map (lambda (port-or-filename) + (if (port? port-or-filename) + (parse-zic-file port-or-filename) + (call-with-input-file port-or-filename parse-zic-file))) + ports-or-filenames)))) -- cgit v1.2.3