summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBastien Guerry <bzg@altern.org>2013-09-26 18:21:37 +0200
committerBastien Guerry <bzg@altern.org>2013-09-26 18:21:37 +0200
commit136c2bc2cb8ec85b5aab0dac61fc211352e1b941 (patch)
treeaecde1a4df884f2ca1b499e77def341b8e9dc969
parentaebacdac7ef8389c19d0ee079d7136e69095acbe (diff)
downloadorg-mode-136c2bc2cb8ec85b5aab0dac61fc211352e1b941.tar.gz
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.
-rw-r--r--contrib/lisp/ox-rss.el9
1 files changed, 6 insertions, 3 deletions
diff --git a/contrib/lisp/ox-rss.el b/contrib/lisp/ox-rss.el
index 487f512..c237bec 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