diff options
author | Kenichi Handa <handa@m17n.org> | 1997-10-22 04:34:23 +0000 |
---|---|---|
committer | Kenichi Handa <handa@m17n.org> | 1997-10-22 04:34:23 +0000 |
commit | 741f7fa4b89139c86c835541ca5dbb137e67d68d (patch) | |
tree | 46561484da7c155a87207d81220c8c2cc7e304d7 /lisp | |
parent | 5cf65218a4fcfd7f3dba658c75d576a18dcb87e5 (diff) | |
download | emacs-741f7fa4b89139c86c835541ca5dbb137e67d68d.tar.gz |
(gnus-structured-field-decoder): Pay attention
to enable-multibyte-characters.
(gnus-unstructured-field-decoder): Likewise.
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/gnus/gnus-sum.el | 16 |
1 files changed, 10 insertions, 6 deletions
diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el index 1fae5060dbe..d1b9deb21e0 100644 --- a/lisp/gnus/gnus-sum.el +++ b/lisp/gnus/gnus-sum.el @@ -621,21 +621,25 @@ is not run if `gnus-visual' is nil." ;; 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) |