From 847e92377e3aaa968fc456313b0f2c28e8b66cf9 Mon Sep 17 00:00:00 2001
From: Jambunathan K <kjambunathan@gmail.com>
Date: Sun, 16 Dec 2012 11:03:00 +0530
Subject: [PATCH] org-e-odt.el: Port fix for Bug#13197

---
 contrib/lisp/org-e-odt.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/contrib/lisp/org-e-odt.el b/contrib/lisp/org-e-odt.el
index 33ae767f4..b7f8b47a0 100644
--- a/contrib/lisp/org-e-odt.el
+++ b/contrib/lisp/org-e-odt.el
@@ -3893,8 +3893,9 @@ contextual information."
 		      (let ((buf (find-buffer-visiting
 				  (concat org-e-odt-zip-dir file))))
 			(when buf
-			  (set-buffer-modified-p nil)
-			  (kill-buffer buf))))
+			  (with-current-buffer buf
+			    (set-buffer-modified-p nil)
+			    (kill-buffer buf)))))
 		    org-e-odt-xml-files)
 	      ;; Delete temporary directory and also other embedded
 	      ;; files that get copied there.