1999-07-07 Daiki Ueno <ueno@ueda.info.waseda.ac.jp>

	* mime-edit.el (mime-edit-quitting-method): Don't refer
	`mime-raw-buffer'.

diff --git a/mime-edit.el b/mime-edit.el
index c6229b8..76ddc00 100644 (file)
--- a/mime-edit.el
+++ b/mime-edit.el
@@ -2575,8 +2575,9 @@ Content-Type: message/partial; id=%s; number=%d; total=%d\n%s\n"
 
 (defun mime-edit-quitting-method ()
   "Quitting method for mime-view."
-  (let ((temp mime-raw-buffer)
-       buf)
+  (let* ((entity (get-text-property (point-min) 'mime-view-entity))
+        (temp (mime-entity-buffer entity))
+        buf)
     (mime-preview-kill-buffer)
     (set-buffer temp)
     (setq buf mime-edit-buffer)