`mime-method-to-decrypt-application/pgp-encrypted'.
;;;
;;; It is based on RFC 2015.
-(defun mime-pgp-decrypt-application/pgp-encrypted (beg end cal)
+(defun mime-method-to-decrypt-application/pgp-encrypted (beg end cal)
(let* ((cnum (mime-article/point-content-number beg))
(rcnum (reverse cnum))
(rmcnum (cdr rcnum))
(set-atype 'mime-acting-condition
'((type . "application/pgp-encrypted")
- (method . mime-pgp-decrypt-application/pgp-encrypted)
+ (method . mime-method-to-decrypt-application/pgp-encrypted)
))