(mime-maybe-hide-echo-buffer): bury MIME echo buffer.
authormorioka <morioka>
Mon, 24 Nov 1997 11:52:06 +0000 (11:52 +0000)
committermorioka <morioka>
Mon, 24 Nov 1997 11:52:06 +0000 (11:52 +0000)
mime-view.el

index b14bcbf..3dbf3ff 100644 (file)
@@ -6,7 +6,7 @@
 ;; Created: 1994/7/13
 ;;     Renamed: 1994/8/31 from tm-body.el
 ;;     Renamed: 1997/02/19 from tm-view.el
-;; Version: $Revision: 0.117 $
+;; Version: $Revision: 0.118 $
 ;; Keywords: MIME, multimedia, mail, news
 
 ;; This file is part of SEMI (SEMI is Emacs MIME Interfaces).
@@ -39,7 +39,7 @@
 ;;;
 
 (defconst mime-view-RCS-ID
-  "$Id: mime-view.el,v 0.117 1997-11-23 15:35:31 morioka Exp $")
+  "$Id: mime-view.el,v 0.118 1997-11-24 11:52:06 morioka Exp $")
 
 (defconst mime-view-version
   `,(get-version-string mime-view-RCS-ID))
@@ -830,7 +830,9 @@ The compressed face will be piped to this command.")
          (let ((win (get-buffer-window buf)))
            (if win
                (delete-window win)
-             ))))))
+             ))
+         (bury-buffer buf)
+         ))))
 
 (defun mime-view-mode (&optional mother ctl encoding ibuf obuf
                                 default-keymap-or-function)