Compare commits

...

2 Commits

Author SHA1 Message Date
Nico 6ff72101e7 changes and fixes 2022-06-12 16:03:14 +01:00
Nico 8e512873ce use dark webring icon 2022-03-09 10:47:06 +00:00
1 changed files with 6 additions and 6 deletions

View File

@ -36,11 +36,11 @@
; header added to the blog index page on the web
(var html-blog-header "<h1>lipu pi jan Niko</h1>\n\n")
; header added to all pages on the web
(var html-header "<!DOCTYPE html><head><link rel=stylesheet href='https://itwont.work/style.css'><title>lipu pi jan Niko</title><body><article>")
(var html-header "<!DOCTYPE html><head><link rel=stylesheet href='/~nihilazo/style.css'><link rel='alternate' type='application/atom+xml' title='lipu pi jan Niko' href='https://itwont.work/atom.xml' /><title>lipu pi jan Niko</title><body><article>")
; footer added to all pages on the web
(var html-footer "</article><footer>
<a href=https://itwont.work>Go Home</a><br>
<a href='https://webring.xxiivv.com/#random' target='_blank'><img id='webring' src='https://webring.xxiivv.com/icon.white.svg'/></a></footer></body>")
<a href='https://webring.xxiivv.com/#random' target='_blank'><img id='webring' src='https://webring.xxiivv.com/icon.black.svg'/></a></footer></body>")
;; Header of the RSS feed. Here you should set your site title (in between the <title> and </title> tags) and name (in between the <name> and </name> tags).
(var rss-feed-header "<?xml version=\"1.0\" encoding=\"utf-8\"?>
@ -92,15 +92,15 @@
(each [_ p (ipairs posts)]
(let [ {: date : title : path} p
entry "\n<entry>
<id>%s%s</id>
<id>%s</id>
<title>%s</title>
<updated>%sT12:00:00Z</updated>
<link href=\"%s\" rel=\"alternate\" />
<link href=\"%s%s\" rel=\"alternate\" />
</entry>\n" ]
(set html-rss-feed (.. html-rss-feed
(entry:format html-baseurl (path:gsub ".gmi" ".html") title date (path:gsub ".gmi" ".html"))))
(entry:format (path:gsub ".gmi" ".html") title date html-baseurl (path:gsub ".gmi" ".html"))))
(set gemini-rss-feed (.. gemini-rss-feed
(entry:format gemini-baseurl path title date (.. gemini-baseurl path))))))
(entry:format path title date gemini-baseurl path)))))
(set html-rss-feed (.. html-rss-feed "</feed>"))
(set gemini-rss-feed (.. gemini-rss-feed "</feed>"))
; write out rss feeds