ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
contrib/lisp/ox-rss.el
View File

@ -204,10 +204,13 @@ publishing directory.
Return output file name." Return output file name."
(let ((bf (get-file-buffer filename))) (let ((bf (get-file-buffer filename)))
(if bf (if bf
(progn
(org-icalendar-create-uid filename 'warn-user)
(with-current-buffer bf (with-current-buffer bf
(org-rss-add-pubdate-property) (org-rss-add-pubdate-property)
(write-file filename)) (write-file filename)))
(find-file filename) (find-file filename)
(org-icalendar-create-uid filename 'warn-user)
(org-rss-add-pubdate-property) (org-rss-add-pubdate-property)
(write-file filename) (kill-buffer))) (write-file filename) (kill-buffer)))
(org-publish-org-to (org-publish-org-to