Wrong coding system in mm-uu-pgp-signed-extract-1

Wrong coding system in mm-uu-pgp-signed-extract-1

[Andreas Schwab]

When gnus verifies a pgp signed message it gets the coding system wrong.
mm-uu-pgp-signed-extract-1 should use the coding system of the *mm-uu*
buffer in preference (which is the coding system that
mm-uu-copy-to-buffer has set from the original buffer), since that is
what the signature was created against.  I have installed this patch in
the emacs-23 branch.

Andreas.

2010-04-01  Andreas Schwab  <schwab@linux-m68k.org>

	* mm-uu.el (mm-uu-pgp-signed-extract-1): Use buffer-file-coding-system
	if set.

=== modified file 'lisp/gnus/mm-uu.el'
--- lisp/gnus/mm-uu.el	2010-01-13 08:35:10 +0000
+++ lisp/gnus/mm-uu.el	2010-04-01 15:08:50 +0000
@@ -486,9 +486,11 @@ apply the face `mm-uu-extract'."
       (if (mm-uu-pgp-signed-test)
 	  (progn
 	    (mml2015-clean-buffer)
-	    (let ((coding-system-for-write (or gnus-newsgroup-charset
+	    (let ((coding-system-for-write (or buffer-file-coding-system
+					       gnus-newsgroup-charset
 					       'iso-8859-1))
-		  (coding-system-for-read (or gnus-newsgroup-charset
+		  (coding-system-for-read (or buffer-file-coding-system
+					      gnus-newsgroup-charset
 					      'iso-8859-1)))
 	      (funcall (mml2015-clear-verify-function))))
 	(when (and mml2015-use (null (mml2015-clear-verify-function)))


-- 
Andreas Schwab, schwab@linux-m68k.org
GPG Key fingerprint = 58CA 54C7 6D53 942B 1756  01D3 44D5 214B 8276 4ED5
"And now for something completely different."