From 29ae032d9311a7d33e281052bef77518d0251631 Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Fri, 27 Jan 2023 00:57:26 +0000
Subject: tissue.scm: Replace filter-map with map.

No elements are being filtered. filter-map is unnecessary.

* tissue.scm (#:web-files): Replace filter-map with map.
---
 tissue.scm | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

(limited to 'tissue.scm')

diff --git a/tissue.scm b/tissue.scm
index f697491..c2e7f37 100644
--- a/tissue.scm
+++ b/tissue.scm
@@ -46,7 +46,7 @@
                                        "IBMPlexSans-Bold-Latin1.woff2"
                                        "IBMPlexMono-Regular-Latin1.woff2"
                                        "IBMPlexMono-Bold-Latin1.woff2"))
-                            (filter-map (lambda (filename)
-                                          (file (replace-extension filename "html")
-                                                (gemtext-exporter filename #:engine %engine)))
-                                        (gemtext-files-in-directory "issues")))))
+                            (map (lambda (filename)
+                                   (file (replace-extension filename "html")
+                                         (gemtext-exporter filename #:engine %engine)))
+                                 (gemtext-files-in-directory "issues")))))
-- 
cgit v1.2.3