summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorArun Isaac2023-01-27 01:57:35 +0000
committerArun Isaac2023-01-27 01:57:35 +0000
commit27713acc8b03bcbf87c60e563db37b2841a36ab3 (patch)
treeafcddbcf994ca74d965d45a7039f6322dd2db17d
parent1fa1b2820949a56b60eaebabd50c1eda718e5402 (diff)
downloadtissue-27713acc8b03bcbf87c60e563db37b2841a36ab3.tar.gz
tissue-27713acc8b03bcbf87c60e563db37b2841a36ab3.tar.lz
tissue-27713acc8b03bcbf87c60e563db37b2841a36ab3.zip
website: Publish release tarballs on website.
* tissue.scm (#:web-files): Add release files. * website/index.skb (Download): New section.
-rw-r--r--tissue.scm5
-rw-r--r--website/index.skb13
2 files changed, 18 insertions, 0 deletions
diff --git a/tissue.scm b/tissue.scm
index c2e7f37..24fbd92 100644
--- a/tissue.scm
+++ b/tissue.scm
@@ -46,6 +46,11 @@
"IBMPlexSans-Bold-Latin1.woff2"
"IBMPlexMono-Regular-Latin1.woff2"
"IBMPlexMono-Bold-Latin1.woff2"))
+ (filter-map (lambda (release-file)
+ (and (string-prefix? "website/releases/" release-file)
+ (file (string-append "releases/" (basename release-file))
+ (copier release-file))))
+ (git-tracked-files (current-git-repository)))
(map (lambda (filename)
(file (replace-extension filename "html")
(gemtext-exporter filename #:engine %engine)))
diff --git a/website/index.skb b/website/index.skb
index f057627..c878e54 100644
--- a/website/index.skb
+++ b/website/index.skb
@@ -25,6 +25,19 @@ through project issues and documentation. The search interface is
built on the ,(ref :url "https://xapian.org/" :text "Xapian search
engine library"), and is available both as a command-line program and
as a web server.])
+ (section :title "Download" :number #f
+ (p [Download release tarballs.])
+ ;; TODO: Auto-generate this list from git tags.
+ (itemize
+ (item [2023-01-27 ,(ref :url "/releases/tissue-0.1.0.tar.lz"
+:text "tissue-0.1.0.tar.lz") ,(ref :url
+"/releases/tissue-0.1.0.tar.lz.asc" :text
+"tissue-0.1.0.tar.lz.asc")]))
+ (p [Download ,(ref :url
+"https://systemreboot.net/about/arunisaac.pub" :text "public signing
+key").])
+ (p [Browse the tissue ,(ref :url
+"https://git.systemreboot.net/tissue/" :text "git repository").]))
(section :title "Documentation" :number #f
(p [The ,(ref :url "/manual/dev/en/" :text "tissue manual") is
available online.])