From 288ac4b17aae5a3dd2b10db1f6b0f51cbbf969cc Mon Sep 17 00:00:00 2001
From: jjanzen <jjanzen@jjanzen.ca>
Date: Tue, 1 Apr 2025 12:42:12 -0500
Subject: [PATCH] testing a new system

---
 publish.el | 24 ++++++++----------------
 1 file changed, 8 insertions(+), 16 deletions(-)

diff --git a/publish.el b/publish.el
index 99d8b7a..1d8aafd 100644
--- a/publish.el
+++ b/publish.el
@@ -12,8 +12,6 @@
 
 (use-package org
   :ensure org-plus-contrib)
-(use-package ox-rss
-  :after org)
 (use-package htmlize
   :after org)
 (use-package yaml-mode)
@@ -21,7 +19,6 @@
 (use-package plz)
 
 (require 'org)
-(require 'ox-html)
 (require 'plz)
 
 (defun my/org-publish-org-sitemap-format (entry style project)
@@ -44,28 +41,23 @@
 
 (defun format-posts-rss-feed-entry (entry _style project)
   (let* (
-         (title (org-publish-find-title entry project))
          (link (concat (file-name-sans-extension entry) ".html"))
          (file (org-publish--expand-file-name entry project))
          (pubdate (format-time-string (car org-time-stamp-formats)
                                       (org-publish-find-date entry project))))
     (message pubdate)
     (format "%s
-:properties:
-:rss_permalink: blog/%s
-:pubdate: %s
-:author: jjanzen
-:end:\n%s"
-            title
-            link
+:PROPERTIES:
+:RSS: t
+:DATE: %s
+:AUTHOR: jjanzen
+:LINK: %s
+:END:\n%s"
             pubdate
+            link
             (get-file-contents file))))
 
-(defun publish-posts-rss-feed (plist filename dir)
-  (if (equal "rss.org" (file-name-nondirectory filename))
-      (progn
-        (message "publishing %s with plist %s and dir %s" filename plist dir)
-        (org-rss-publish-to-rss plist filename dir))))
+(defun publish-posts-rss-feed (plist filename dir))
 
 (defvar jj/html-head "\
 <link rel='stylesheet' href='/css/stylesheet.css' type='text/css'/>\