mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-02-16 17:24:23 +00:00
(gnus-structured-field-decoder): If the
feature `mule' is provided, set the default value to the function which decode the argument string by gnus-mule-coding-system. (gnus-unstructured-field-decoder): Likewise.
This commit is contained in:
parent
b784063f36
commit
80bb5a78a5
1 changed files with 12 additions and 2 deletions
|
|
@ -620,12 +620,22 @@ is not run if `gnus-visual' is nil."
|
|||
:type 'hook)
|
||||
|
||||
;; 1997/5/4 by MORIOKA Tomohiko <morioka@jaist.ac.jp>
|
||||
(defcustom gnus-structured-field-decoder 'identity
|
||||
(defcustom gnus-structured-field-decoder
|
||||
(if (featurep 'mule)
|
||||
(lambda (string)
|
||||
(if gnus-mule-coding-system
|
||||
(decode-coding-string string gnus-mule-coding-system)
|
||||
)))
|
||||
"Function to decode non-ASCII characters in structured field for summary."
|
||||
:group 'gnus-various
|
||||
:type 'function)
|
||||
|
||||
(defcustom gnus-unstructured-field-decoder 'identity
|
||||
(defcustom gnus-unstructured-field-decoder
|
||||
(if (featurep 'mule)
|
||||
(lambda (string)
|
||||
(if gnus-mule-coding-system
|
||||
(decode-coding-string string gnus-mule-coding-system)
|
||||
)))
|
||||
"Function to decode non-ASCII characters in unstructured field for summary."
|
||||
:group 'gnus-various
|
||||
:type 'function)
|
||||
|
|
|
|||
Loading…
Reference in a new issue