Mercurial > emacs
changeset 20117:b84c6ec5f561
(gnus-structured-field-decoder): Pay attention
to enable-multibyte-characters.
(gnus-unstructured-field-decoder): Likewise.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Wed, 22 Oct 1997 04:34:23 +0000 |
| parents | 8c1995cc7702 |
| children | 44afc898c138 |
| files | lisp/gnus/gnus-sum.el |
| diffstat | 1 files changed, 10 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/gnus/gnus-sum.el Tue Oct 21 10:47:35 1997 +0000 +++ b/lisp/gnus/gnus-sum.el Wed Oct 22 04:34:23 1997 +0000 @@ -621,21 +621,25 @@ ;; 1997/5/4 by MORIOKA Tomohiko <morioka@jaist.ac.jp> (defcustom gnus-structured-field-decoder - (if (featurep 'mule) + (if (and (featurep 'mule) + (boundp 'enable-multibyte-characters)) (lambda (string) - (if gnus-mule-coding-system + (if (and enable-multibyte-characters gnus-mule-coding-system) (decode-coding-string string gnus-mule-coding-system) - ))) + string)) + 'identity) "Function to decode non-ASCII characters in structured field for summary." :group 'gnus-various :type 'function) (defcustom gnus-unstructured-field-decoder - (if (featurep 'mule) + (if (and (featurep 'mule) + (boundp 'enable-multibyte-characters)) (lambda (string) - (if gnus-mule-coding-system + (if (and enable-multibyte-characters gnus-mule-coding-system) (decode-coding-string string gnus-mule-coding-system) - ))) + string)) + 'identity) "Function to decode non-ASCII characters in unstructured field for summary." :group 'gnus-various :type 'function)