From: morioka <morioka>
Date: Fri, 19 Jun 1998 19:31:21 +0000 (+0000)
Subject: (mime-view-application/pgp): fixed.
X-Git-Tag: semi-1_7_1~34
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=a1c3dc901f0b0b89d7d90cb181de53907721f1a7;p=elisp%2Fsemi.git

(mime-view-application/pgp): fixed.
(mime-verify-application/pgp-signature): Use `mime-message-structure'
instead of `mime-raw-message-info'.
(mime-decrypt-application/pgp-encrypted): Use `mime-message-structure'
instead of `mime-raw-message-info'.
---

diff --git a/mime-pgp.el b/mime-pgp.el
index a37b790..fa33f4f 100644
--- a/mime-pgp.el
+++ b/mime-pgp.el
@@ -107,7 +107,7 @@
 			  (and
 			   (search-forward "\n\n")
 			   (match-end 0)))
-	   (setq representation-type (function mime-text-decode-buffer))
+	   (setq representation-type 'binary)
 	   ))
     (setq major-mode 'mime-show-message-mode)
     (setq mime-raw-representation-type representation-type)
@@ -169,7 +169,7 @@ It should be ISO 639 2 letter language code such as en, ja, ...")
 		   (1- knum)
 		 (1+ knum)))
 	 (oinfo (mime-raw-find-entity-from-node-id
-		 (cons onum mother-node-id) mime-raw-message-info))
+		 (cons onum mother-node-id) mime-message-structure))
 	 (basename (expand-file-name "tm" mime-temp-directory))
 	 (orig-file (make-temp-name basename))
 	 (sig-file (concat orig-file ".sig"))
@@ -229,7 +229,7 @@ It should be ISO 639 2 letter language code such as en, ja, ...")
 		   (1- knum)
 		 (1+ knum)))
 	 (oinfo (mime-raw-find-entity-from-node-id
-		 (cons onum mother-node-id) mime-raw-message-info)))
+		 (cons onum mother-node-id) mime-message-structure)))
     (mime-view-application/pgp oinfo situation)
     ))