From 4a39e49241c57f5f44ea298d022cdaa812ef42f7 Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Fri, 8 Jul 2022 15:53:38 +0530
Subject: tissue.scm: Remove html extension from web URIs.

* tissue.scm (#:indexed-documents): Remove html extension from web
URIs.
---
 tissue.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'tissue.scm')

diff --git a/tissue.scm b/tissue.scm
index fccbf9d..08522b4 100644
--- a/tissue.scm
+++ b/tissue.scm
@@ -2,7 +2,7 @@
  #:project "tissue"
  #:indexed-documents (map (lambda (filename)
                             (indexed-document (cut read-gemtext-issue filename)
-                                              (string-append "/" (replace-extension filename "html"))))
+                                              (string-append "/" (string-remove-suffix ".gmi" filename))))
                           (gemtext-files-in-directory "issues"))
  #:web-files (cons (file "index.html"
                          (skribe-exporter "website/index.skb"))
-- 
cgit v1.2.3