Revert "tissue.scm: Remove html extension from web URIs."

We revert commit e318ded5997b0d644b9b0ead36909feb1427b037 temporarily
until the tissue package can be upgraded in guix-forge and
guix-bioinformatics.

1 files changed, 2 insertions, 2 deletions

diff --git a/tissue.scm b/tissue.scm
index 7d0291d..65df566 100644
--- a/tissue.scm
+++ b/tissue.scm
@@ -34,11 +34,11 @@
              ("Zachary Sloan" "zach" "zachs" "zsloan"))
  #:indexed-documents (append (map (lambda (filename)
                                     (indexed-document (cut read-gemtext-issue filename)
-                                                      (string-append "/" (string-remove-suffix ".gmi" filename))))
+                                                      (string-append "/" (replace-extension filename "html"))))
                                   (gemtext-files-in-directory "issues"))
                              (map (lambda (filename)
                                     (indexed-document (cut read-gemtext-document filename)
-                                                      (string-append "/" (string-remove-suffix ".gmi" filename))))
+                                                      (string-append "/" (replace-extension filename "html"))))
                                   (gemtext-files-in-directory "topics")))
  #:web-css "/style.css"
  #:web-files (cons* (file "style.css"