From: morioka Date: Tue, 18 Mar 1997 14:41:56 +0000 (+0000) Subject: (emh-summary-before-quit): `mime::article/preview-buffer' -> X-Git-Tag: emh-0_21~22 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=0a1610b4220d975361562d119034a03d41298139;p=elisp%2Femh.git (emh-summary-before-quit): `mime::article/preview-buffer' -> `mime-view-buffer'. --- diff --git a/emh.el b/emh.el index 12000a5..c05ab29 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.15 $ +;; Version: $Revision: 0.16 $ ;; 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.15 1997-03-18 13:47:26 morioka Exp $") + "$Id: emh.el,v 0.16 1997-03-18 14:41:56 morioka Exp $") (defconst emh-version (get-version-string emh-RCS-ID)) @@ -345,8 +345,8 @@ It is registered to variable `mime-view-content-header-filter-alist'." (if buf (let ((the-buf (current-buffer))) (switch-to-buffer buf) - (if (and mime::article/preview-buffer - (setq buf (get-buffer mime::article/preview-buffer)) + (if (and mime-view-buffer + (setq buf (get-buffer mime-view-buffer)) ) (progn (switch-to-buffer the-buf) @@ -357,7 +357,7 @@ It is registered to variable `mime-view-content-header-filter-alist'." )))) (add-hook 'mh-before-quit-hook (function emh-summary-before-quit)) - + ;;; @@ for emh-comp.el ;;;