(emh-quitting-method): Use `mime-maybe-hide-echo-buffer' instead of

`mime-hide-echo-buffer'. (cf. [tm-ja:2710])

diff --git a/emh.el b/emh.el
index 7319024..5bf713c 100644 (file)
--- a/emh.el
+++ b/emh.el
@@ -8,7 +8,7 @@
 ;; Created: 1993/11/21
 ;;     Renamed: 1993/11/27 from mh-e-mime.el
 ;;     Renamed: 1997/02/21 from tm-mh-e.el
-;; Version: $Revision: 0.23 $
+;; Version: $Revision: 0.24 $
 ;; Keywords: MH, MIME, multimedia, encoded-word, multilingual, mail
 
 ;; This file is part of emh.
@@ -38,7 +38,7 @@
 ;;;
 
 (defconst emh-RCS-ID
-  "$Id: emh.el,v 0.23 1997-11-26 09:40:34 morioka Exp $")
+  "$Id: emh.el,v 0.24 1997-11-27 15:07:49 morioka Exp $")
 
 (defconst emh-version (get-version-string emh-RCS-ID))
 
@@ -261,7 +261,7 @@ It is registered to variable `mime-view-content-header-filter-alist'."
 
 (defun emh-quitting-method ()
   (let ((buf (current-buffer)))
-    (mime-hide-echo-buffer)
+    (mime-maybe-hide-echo-buffer)
     (pop-to-buffer
      (let ((name (buffer-name buf)))
        (substring name 5)