(mime-display-message): Try use window of mother buffer to display

mime-preview-buffer.

diff --git a/mime-view.el b/mime-view.el
index 0fb973d..fc5cf83 100644 (file)
--- a/mime-view.el
+++ b/mime-view.el
@@ -910,8 +910,11 @@ MEDIA-TYPE must be (TYPE . SUBTYPE), TYPE or t.  t means default."
          (let ((r-win (get-buffer-window raw-buffer)))
            (if r-win
                (set-window-buffer r-win preview-buffer)
-             (switch-to-buffer preview-buffer)
-             )))
+             (let ((m-win (and mother (get-buffer-window mother))))
+               (if m-win
+                   (set-window-buffer m-win preview-buffer)
+                 (switch-to-buffer preview-buffer)
+                 )))))
       )))
 
 (defun mime-view-buffer (&optional raw-buffer preview-buffer mother