From 136c2bc2cb8ec85b5aab0dac61fc211352e1b941 Mon Sep 17 00:00:00 2001 From: Bastien Guerry Date: Thu, 26 Sep 2013 18:21:37 +0200 Subject: [PATCH] contrib/lisp/ox-rss.el (org-rss-publish-to-rss): Create id when publishing * contrib/lisp/ox-rss.el (org-rss-publish-to-rss): Create id when publishing. --- contrib/lisp/ox-rss.el | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) diff --git a/contrib/lisp/ox-rss.el b/contrib/lisp/ox-rss.el index 487f51208..c237beca1 100644 --- a/contrib/lisp/ox-rss.el +++ b/contrib/lisp/ox-rss.el @@ -204,10 +204,13 @@ 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)) + (progn + (org-icalendar-create-uid filename 'warn-user) + (with-current-buffer bf + (org-rss-add-pubdate-property) + (write-file filename))) (find-file filename) + (org-icalendar-create-uid filename 'warn-user) (org-rss-add-pubdate-property) (write-file filename) (kill-buffer))) (org-publish-org-to