mirrors/org-mode
0
0
Fork 1
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-07-15 17:46:27 +00:00
Code Releases Activity

Merge branch 'maint'

Browse source
This commit is contained in:
Bastien Guerry 2012-12-20 16:07:52 +01:00
parent e5539d4d58 de84aadf8f
commit feacde6c71
1 changed files with 5 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
lisp/org-odt.el
View file

@ -439,11 +439,11 @@ values. See Info node `(emacs) File Variables'."
"meta.xml" "styles.xml")))
;; kill all xml buffers
(mapc (lambda (file)
(let ((buf (find-file-noselect
(expand-file-name file org-odt-zip-dir) t)))
(when (buffer-name buf)
(set-buffer-modified-p nil)
(kill-buffer buf))))
(with-current-buffer
(find-file-noselect
(expand-file-name file org-odt-zip-dir) t)
(set-buffer-modified-p nil)
(kill-buffer)))
xml-files))
;; delete temporary directory.
(delete-directory org-odt-zip-dir t)))))