(mime-article/check-pgp-signature): `mime/output-buffer-name' ->

`mime-echo-buffer-name'.

diff --git a/mime-pgp.el b/mime-pgp.el
index 56d799f..67a59bc 100644 (file)
--- a/mime-pgp.el
+++ b/mime-pgp.el
@@ -5,7 +5,7 @@
 ;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
 ;; Created: 1995/12/7
 ;;     Renamed: 1997/2/27 from tm-pgp.el
-;; Version: $Id: mime-pgp.el,v 0.15 1997-03-18 14:45:47 morioka Exp $
+;; Version: $Id: mime-pgp.el,v 0.16 1997-03-27 20:39:15 morioka Exp $
 ;; Keywords: PGP, security, MIME, multimedia, mail, news
 
 ;; This file is part of SEMI (SEMI is Emacs MIME Interfaces).
@@ -204,10 +204,10 @@ It should be ISO 639 2 letter language code such as en, ja, ...")
       (mime-decode-region (point-min)(point-max) encoding)
       (as-binary-output-file (write-file sig-file))
       (or (mime::article/call-pgp-to-check-signature
-          mime/output-buffer-name orig-file)
+          mime-echo-buffer-name orig-file)
          (let (pgp-id)
            (save-excursion
-             (set-buffer mime/output-buffer-name)
+             (set-buffer mime-echo-buffer-name)
              (goto-char (point-min))
              (let ((regexp (cdr (assq (or mime-pgp-default-language 'en)
                                       mime-pgp-key-expected-regexp-alist))))
@@ -228,10 +228,10 @@ It should be ISO 639 2 letter language code such as en, ja, ...")
                (progn
                  (funcall (pgp-function 'fetch-key) (cons nil pgp-id))
                  (mime::article/call-pgp-to-check-signature
-                  mime/output-buffer-name orig-file)
+                  mime-echo-buffer-name orig-file)
                  ))
            ))
-      (let ((other-window-scroll-buffer mime/output-buffer-name))
+      (let ((other-window-scroll-buffer mime-echo-buffer-name))
        (scroll-other-window 8)
        )
       (kill-buffer kbuf)