Synch with Gnus.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 8f08bc0..4ca8f5c 100644 (file)
--- 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 (file)
--- 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 (file)
--- 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."