Prechádzať zdrojové kódy

contrib/lisp/ox-rss.el (org-rss-publish-to-rss): Add the PUBDATE property when publishing

* contrib/lisp/ox-rss.el (org-rss-publish-to-rss): Add the PUBDATE property
when publishing.

Thanks to Mikko Kouhia for reporting this bug.
Bastien Guerry 11 rokov pred
rodič
commit
330eb689cd
1 zmenil súbory, kde vykonal 8 pridanie a 0 odobranie
  1. 8 0
      contrib/lisp/ox-rss.el

+ 8 - 0
contrib/lisp/ox-rss.el

@@ -213,6 +213,14 @@ is the property list for the given project.  PUB-DIR is the
 publishing directory.
 
 Return output file name."
+  (let ((bf (get-file-buffer filename)))
+    (if bf
+	(with-current-buffer bf
+	  (org-rss-add-pubdate-property)
+	  (write-file filename))
+      (find-file filename)
+      (org-rss-add-pubdate-property)
+      (write-file) (kill-buffer)))
   (org-publish-org-to
    'rss filename (concat "." org-rss-extension) plist pub-dir))