diff options
| author | Andreas Schwab <schwab@linux-m68k.org> | 2010-04-01 17:34:05 +0200 |
|---|---|---|
| committer | Andreas Schwab <schwab@linux-m68k.org> | 2010-04-01 17:34:05 +0200 |
| commit | d7b4879190af6e17673d8c3bdd0c71785bb4551e (patch) | |
| tree | eac0a5931e1cd9a932f7b5203a3ea41cbe78a023 /lisp/gnus/mm-uu.el | |
| parent | 8a14dec7ef880dea69f1102cc93387a13d73c301 (diff) | |
| download | emacs-d7b4879190af6e17673d8c3bdd0c71785bb4551e.tar.gz | |
Use correct coding system when verifying a pgp signed message
* mm-uu.el (mm-uu-pgp-signed-extract-1): Use buffer-file-coding-system
if set.
Diffstat (limited to 'lisp/gnus/mm-uu.el')
| -rw-r--r-- | lisp/gnus/mm-uu.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/gnus/mm-uu.el b/lisp/gnus/mm-uu.el index c690713ef14..5ae9205e2f0 100644 --- a/lisp/gnus/mm-uu.el +++ b/lisp/gnus/mm-uu.el @@ -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))) |