From 90eaf3be3ee87d46bce59545543dc12f6f4c62e1 Mon Sep 17 00:00:00 2001 From: Jacob Janzen Date: Sat, 28 Sep 2024 11:12:58 -0500 Subject: temporarily remove webring --- publish.el | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) diff --git a/publish.el b/publish.el index a335ed5..37b02f6 100644 --- a/publish.el +++ b/publish.el @@ -24,13 +24,13 @@ (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 "" - (gethash "url" (gethash "left" webring)) - (gethash "name" (gethash "left" webring)) - (gethash "url" (gethash "right" webring)) - (gethash "name" (gethash "right" webring)))) +;; (setq webring (json-parse-string (plz 'get "https://aidang.cc/webring/https://jjanzen.ca"))) +;; (defun create-webring-html (plist) +;; ;; (format "" +;; ;; (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)) @@ -74,7 +74,7 @@ (org-rss-publish-to-rss plist filename dir))) (setq org-html-htmlize-output-type 'css) -(setq org-html-postamble 'create-webring-html) +;; (setq org-html-postamble 'create-webring-html) (setq org-publish-project-alist '( ("org-core" -- cgit v1.2.3