From: morioka <morioka>
Date: Sat, 14 Mar 1998 12:32:40 +0000 (+0000)
Subject: (mime-method-to-decrypt-application/pgp-encrypted): Use
X-Git-Tag: semi-1_1_0~51
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=228cb2162e8db55c403b7044931d85b54ab4c324;p=elisp%2Fsemi.git

(mime-method-to-decrypt-application/pgp-encrypted): Use
`mime-raw-point-to-entity-node-id'; abolish `entity-number'.
---

diff --git a/mime-pgp.el b/mime-pgp.el
index 25ab6c7..3e0f386 100644
--- a/mime-pgp.el
+++ b/mime-pgp.el
@@ -260,8 +260,7 @@ It should be ISO 639 2 letter language code such as en, ja, ...")
 ;;; It is based on RFC 2015 (PGP/MIME).
 
 (defun mime-method-to-decrypt-application/pgp-encrypted (start end cal)
-  (let* ((entity-number (mime-raw-point-to-entity-number start))
-	 (entity-node-id (reverse entity-number))
+  (let* ((entity-node-id (mime-raw-point-to-entity-node-id start))
 	 (rmcnum (cdr entity-node-id))
 	 (knum (car entity-node-id))
 	 (onum (if (> knum 0)