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.
This commit is contained in:
Bastien Guerry 2013-09-26 18:21:37 +02:00
parent aebacdac7e
commit 136c2bc2cb
1 changed files with 6 additions and 3 deletions

View File

@ -204,10 +204,13 @@ publishing directory.
Return output file name."
(let ((bf (get-file-buffer filename)))
(if bf
(progn
(org-icalendar-create-uid filename 'warn-user)
(with-current-buffer bf
(org-rss-add-pubdate-property)
(write-file filename))
(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