From 2f1c0834dd014ed22e9d575c45c3eab131b424a1 Mon Sep 17 00:00:00 2001 From: Jacob Janzen Date: Sun, 28 Apr 2024 17:02:26 -0500 Subject: use my actual function --- publish.el | 7 ++----- 1 file changed, 2 insertions(+), 5 deletions(-) (limited to 'publish.el') diff --git a/publish.el b/publish.el index d7b9bf6..4072912 100644 --- a/publish.el +++ b/publish.el @@ -23,16 +23,13 @@ (require 'plz) (setq webring (json-parse-string (plz 'get "https://aidang.cc/webring/https://jjanzen.ca"))) -(defun create-webring-html () +(defun create-webring-html (plist) (format "
« %sCSSA Web Ring%s »
" (gethash "url" (gethash "left" webring)) (gethash "name" (gethash "left" webring)) (gethash "url" (gethash "right" webring)) (gethash "name" (gethash "right" webring)))) -(defun my-org-html-postamble (plist) - (format "Last update : %s" (format-time-string "%d %b %Y"))) - (defun my/org-publish-org-sitemap-format (entry style project) (cond ((not (directory-name-p entry)) (format "(%s) [[file:blog/%s][%s]]\n" @@ -75,7 +72,7 @@ (org-rss-publish-to-rss plist filename dir))) (setq org-html-htmlize-output-type 'css) -(setq org-html-postamble 'my-org-html-postamble) +(setq org-html-postamble 'create-webring-html) (setq org-publish-project-alist '( ("org-core" -- cgit v1.2.3