diff options
author | Jacob Janzen <jacob.a.s.janzen@gmail.com> | 2024-12-31 13:03:06 -0600 |
---|---|---|
committer | Jacob Janzen <jacob.a.s.janzen@gmail.com> | 2024-12-31 13:03:06 -0600 |
commit | 37d63c206b9d5d3809ff486d50565f7ace57bea4 (patch) | |
tree | 69c49e27872f4e783743197e340d193895303db5 /publish.el | |
parent | dbb479876cdbd00797983fc81bb9bf35cabba40b (diff) |
include script for webring
Diffstat (limited to 'publish.el')
-rw-r--r-- | publish.el | 13 |
1 files changed, 4 insertions, 9 deletions
@@ -24,14 +24,6 @@ (require 'ox-html) (require 'plz) -(setq webring (json-parse-string (plz 'get "https://aidang.cc/webring/https://jjanzen.ca"))) -(defun create-webring-html (plist) - (format "<div class='footer'><div class='footer-top'><span><a href='%s'>« %s</a></span><span>CSSA Web Ring</span><span><a href='%s'>%s »</a></span></div><div class='footer-bottom'>Copyright (C) jjanzen 2024</div></div>" - (gethash "url" (gethash "left" webring)) - (gethash "name" (gethash "left" webring)) - (gethash "url" (gethash "right" webring)) - (gethash "name" (gethash "right" webring)))) - (defun my/org-publish-org-sitemap-format (entry style project) (cond ((not (directory-name-p entry)) (format "(%s) [[file:blog/%s][%s]]\n" @@ -73,6 +65,9 @@ (if (equal "rss.org" (file-name-nondirectory filename)) (org-rss-publish-to-rss plist filename dir))) +(defvar jj/html-head "\ +<link rel='stylesheet' href='/css/stylesheet.css' type='text/css'/>\ +<script src='/script/cssa-webring.js'></script>") (defvar jj/html-preamble "\ <div class='topnav'>\ <a href='/'>Home</a>\ @@ -85,7 +80,7 @@ </div>") (defvar jj/html-postamble "\ <footer>\ - <aside class='cssa-webring-container'>\ + <aside id='cssa-webring-container' class='cssa-webring-container'>\ <section class='cssa-webring-description'>\ \"Official\" CSSA Webring\ </section>\ |