diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index 33c2a39..1654498 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -1879,6 +1879,7 @@ higher priority settings."
 	  (t
 	   (let ((bs (buffer-string)))
 	     (find-file file)
+	     (erase-buffer)
 	     (insert bs)
 	     (save-buffer 0)
 	     (kill-buffer (current-buffer))