From: yamaoka <yamaoka>
Date: Tue, 21 Nov 2000 21:56:14 +0000 (+0000)
Subject: Synch with Gnus.
X-Git-Url: http://git.chise.org/gitweb/?p=elisp%2Fgnus.git-;a=commitdiff_plain;h=4c4ee2ed7b5f6c14942c73a92ff0a761b78fe2dd

Synch with Gnus.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 8f08bc0..4ca8f5c 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2000-11-21 09:00:00  ShengHuo ZHU  <zsh@cs.rochester.edu>
+
+	* mm-decode.el (mm-verify-option): Default value.
+
+	* mml-sec.el (mml-secure-part): Error message.
+
 2000-11-20 18:00:00  ShengHuo ZHU  <zsh@cs.rochester.edu>
 
 	* gnus-ml.el (gnus-mailing-list-archive): Use browse-url.
diff --git a/lisp/mm-decode.el b/lisp/mm-decode.el
index 18fe126..5ea7649 100644
--- a/lisp/mm-decode.el
+++ b/lisp/mm-decode.el
@@ -250,7 +250,7 @@ to:
     ("application/x-pkcs7-signature" mml-smime-verify "S/MIME" 
      mml-smime-verify-test)))
 
-(defcustom mm-verify-option nil
+(defcustom mm-verify-option 'never
   "Option of verifying signed parts.
 `never', not verify; `always', always verify; 
 `known', only verify known protocols. Otherwise, ask user."
diff --git a/lisp/mml-sec.el b/lisp/mml-sec.el
index 0d1dfee..cc54995 100644
--- a/lisp/mml-sec.el
+++ b/lisp/mml-sec.el
@@ -85,7 +85,7 @@
 	     (goto-char (match-end 0))
 	     (apply 'mml-insert-tag 'part (cons (if sign 'sign 'encrypt)
 						(cons method tags))))
-	    (t (error "Can't find where this part begin"))))))
+	    (t (error "The message is corrupted. No mail header separator."))))))
 
 (defun mml-secure-sign-pgpmime ()
   "Add MML tags to PGP/MIME sign this MML part."