From cb850f2f707591559669bced9e184d99939c618f Mon Sep 17 00:00:00 2001 From: yamaoka Date: Mon, 30 Sep 2002 13:46:31 +0000 Subject: [PATCH] Synch with Oort Gnus. --- lisp/ChangeLog | 5 +++++ lisp/mml2015.el | 7 +++++-- 2 files changed, 10 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index f843d15..bb428a7 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2002-09-30 Simon Josefsson + + * mml2015.el (mml2015-pgg-clear-verify): Verifying in a unibyte + buffer seem to be needed? + 2002-09-29 Simon Josefsson * mml1991.el (pgg-output-buffer, pgg-errors-buffer): Prevent byte diff --git a/lisp/mml2015.el b/lisp/mml2015.el index cdda790..15a4201 100644 --- a/lisp/mml2015.el +++ b/lisp/mml2015.el @@ -761,10 +761,13 @@ by you.") handle) (defun mml2015-pgg-clear-verify () - (let ((pgg-errors-buffer mml2015-result-buffer)) + (let ((pgg-errors-buffer mml2015-result-buffer) + (text (current-buffer))) (if (condition-case err (prog1 - (pgg-verify-region (point-min) (point-max) nil t) + (mm-with-unibyte-buffer + (insert-buffer text) + (pgg-verify-region (point-min) (point-max) nil t)) (mm-set-handle-multipart-parameter mm-security-handle 'gnus-details (with-current-buffer mml2015-result-buffer -- 1.7.10.4