diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/gnus/gnus-sum.el | 14 |
1 files changed, 12 insertions, 2 deletions
diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el index 1ed79489c32..1fae5060dbe 100644 --- a/lisp/gnus/gnus-sum.el +++ b/lisp/gnus/gnus-sum.el | |||
| @@ -620,12 +620,22 @@ is not run if `gnus-visual' is nil." | |||
| 620 | :type 'hook) | 620 | :type 'hook) |
| 621 | 621 | ||
| 622 | ;; 1997/5/4 by MORIOKA Tomohiko <morioka@jaist.ac.jp> | 622 | ;; 1997/5/4 by MORIOKA Tomohiko <morioka@jaist.ac.jp> |
| 623 | (defcustom gnus-structured-field-decoder 'identity | 623 | (defcustom gnus-structured-field-decoder |
| 624 | (if (featurep 'mule) | ||
| 625 | (lambda (string) | ||
| 626 | (if gnus-mule-coding-system | ||
| 627 | (decode-coding-string string gnus-mule-coding-system) | ||
| 628 | ))) | ||
| 624 | "Function to decode non-ASCII characters in structured field for summary." | 629 | "Function to decode non-ASCII characters in structured field for summary." |
| 625 | :group 'gnus-various | 630 | :group 'gnus-various |
| 626 | :type 'function) | 631 | :type 'function) |
| 627 | 632 | ||
| 628 | (defcustom gnus-unstructured-field-decoder 'identity | 633 | (defcustom gnus-unstructured-field-decoder |
| 634 | (if (featurep 'mule) | ||
| 635 | (lambda (string) | ||
| 636 | (if gnus-mule-coding-system | ||
| 637 | (decode-coding-string string gnus-mule-coding-system) | ||
| 638 | ))) | ||
| 629 | "Function to decode non-ASCII characters in unstructured field for summary." | 639 | "Function to decode non-ASCII characters in unstructured field for summary." |
| 630 | :group 'gnus-various | 640 | :group 'gnus-various |
| 631 | :type 'function) | 641 | :type 'function) |