diff options
author | Bastien Guerry <bzg@altern.org> | 2013-09-26 18:21:37 +0200 |
---|---|---|
committer | Bastien Guerry <bzg@altern.org> | 2013-09-26 18:21:37 +0200 |
commit | 136c2bc2cb8ec85b5aab0dac61fc211352e1b941 (patch) | |
tree | aecde1a4df884f2ca1b499e77def341b8e9dc969 | |
parent | aebacdac7ef8389c19d0ee079d7136e69095acbe (diff) | |
download | org-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.el | 9 |
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 |