Index: emacs/lisp/mh-e/mh-mime.el
diff -c emacs/lisp/mh-e/mh-mime.el:1.13 emacs/lisp/mh-e/mh-mime.el:1.14
*** emacs/lisp/mh-e/mh-mime.el:1.13 Tue Jun 14 15:37:18 2005
--- emacs/lisp/mh-e/mh-mime.el Thu Jun 16 15:04:53 2005
***************
*** 597,605 ****
(let ((valid-methods (list "pgpmime" "pgp" "smime"))
(valid-modes (list "sign" "encrypt" "signencrypt" "none")))
(if (not (member method valid-methods))
! (error (format "Sorry. METHOD \"%s\" is invalid" method)))
(if (not (member mode valid-modes))
! (error (format "Sorry. MODE \"%s\" is invalid" mode)))
(mml-unsecure-message)
(if (not (string= mode "none"))
(save-excursion
--- 597,605 ----
(let ((valid-methods (list "pgpmime" "pgp" "smime"))
(valid-modes (list "sign" "encrypt" "signencrypt" "none")))
(if (not (member method valid-methods))
! (error "Sorry. METHOD \"%s\" is invalid" method))
(if (not (member mode valid-modes))
! (error "Sorry. MODE \"%s\" is invalid" mode))
(mml-unsecure-message)
(if (not (string= mode "none"))
(save-excursion
_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs
