diff options
author | Matt Lundin <mdl@imapmail.org> | 2014-07-23 14:18:06 -0500 |
---|---|---|
committer | Bastien Guerry <bzg@altern.org> | 2014-07-26 20:07:16 +0200 |
commit | 092213b507cd5619c839df372ae93fbe3c7b57ab (patch) | |
tree | 8a225ee14cf803881a09c4f26348fa0cbe1aa482 | |
parent | 08e77958598edc1fa83c452399587e74ecd4a03d (diff) | |
download | org-mode-092213b507cd5619c839df372ae93fbe3c7b57ab.tar.gz |
Fix ID generation in org-rss-publish-to-rss
* contrib/lisp/ox-rss.el (org-rss-publish-to-rss): Fix a bug that
causes ID properties to be generated in org buffer emacs is
currently visiting rather than the file containing the feed.
-rw-r--r-- | contrib/lisp/ox-rss.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/contrib/lisp/ox-rss.el b/contrib/lisp/ox-rss.el index c69a37b..5cae288 100644 --- a/contrib/lisp/ox-rss.el +++ b/contrib/lisp/ox-rss.el @@ -204,11 +204,10 @@ 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-icalendar-create-uid filename 'warn-user) (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) |