From: morioka Date: Thu, 27 Nov 1997 15:07:49 +0000 (+0000) Subject: (emh-quitting-method): Use `mime-maybe-hide-echo-buffer' instead of X-Git-Tag: emh-1_1~6 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=0d4df992c895b0108f75781e1c924952803031ff;p=elisp%2Femh.git (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 --- 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)