From: yamaoka <yamaoka>
Date: Tue, 14 Sep 1999 01:49:06 +0000 (+0000)
Subject: (mime-mc-gpg-process-region): Call the parser function with the 6th arg `nil'
X-Git-Tag: semi-pgpgpg_20~9
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=20469436ca3e18855e7573ad659b68cc1c666caf;p=elisp%2Fsemi.git

(mime-mc-gpg-process-region): Call the parser function with the 6th arg `nil'
if `mc-gpg-handle-pre095' is not bound.  It is supposed to be used with another
mc-gpg.el which is available from http://www.lothar.com/tech/crypto/.
---

diff --git a/mime-mc.el b/mime-mc.el
index 22c7164..4782504 100644
--- a/mime-mc.el
+++ b/mime-mc.el
@@ -410,7 +410,9 @@ optional argument COMMENT if it is specified."
 	  ;; feed the parser
 	  (condition-case err
 	      (setq parser-result
-		    (funcall parser mybuf stderr-buf status-buf rc)
+		    (if (boundp 'mc-gpg-handle-pre095)
+			(funcall parser mybuf stderr-buf status-buf rc)
+		      (funcall parser mybuf stderr-buf status-buf rc nil))
 		    )
 	    (error
 	     (message "%s" err)