Variable: gnus-article-save-coding-system
gnus-article-save-coding-system is a customizable variable defined in
gnus-art.el.gz.
Value
utf-8
Documentation
Coding system used to save decoded articles to a file.
The recommended coding systems are utf-8, iso-2022-7bit and so on,
which can safely encode any characters in text. This is used by the
commands including:
* gnus-summary-save-article-file
* gnus-summary-save-article-body-file
* gnus-summary-write-article-file
* gnus-summary-write-article-body-file
and the functions to which you may set gnus-default-article-saver:
* gnus-summary-save-in-file
* gnus-summary-save-body-in-file
* gnus-summary-write-to-file
* gnus-summary-write-body-to-file
Those commands and functions save just text displayed in the article buffer to a file if the value of this variable is non-nil. Note that buttonized MIME parts will be lost in a saved file in that case. Otherwise, raw articles will be saved.
Source Code
;; Defined in /usr/src/emacs/lisp/gnus/gnus-art.el.gz
(defcustom gnus-article-save-coding-system
(or (and (mm-coding-system-p 'utf-8) 'utf-8)
(and (mm-coding-system-p 'iso-2022-7bit) 'iso-2022-7bit)
(and (mm-coding-system-p 'emacs-mule) 'emacs-mule)
(and (mm-coding-system-p 'escape-quoted) 'escape-quoted))
"Coding system used to save decoded articles to a file.
The recommended coding systems are `utf-8', `iso-2022-7bit' and so on,
which can safely encode any characters in text. This is used by the
commands including:
* `gnus-summary-save-article-file'
* `gnus-summary-save-article-body-file'
* `gnus-summary-write-article-file'
* `gnus-summary-write-article-body-file'
and the functions to which you may set `gnus-default-article-saver':
* `gnus-summary-save-in-file'
* `gnus-summary-save-body-in-file'
* `gnus-summary-write-to-file'
* `gnus-summary-write-body-to-file'
Those commands and functions save just text displayed in the article
buffer to a file if the value of this variable is non-nil. Note that
buttonized MIME parts will be lost in a saved file in that case.
Otherwise, raw articles will be saved."
:group 'gnus-article-saving
:type `(choice
:format "%{%t%}:\n %[Value Menu%] %v"
(const :tag "Save raw articles" nil)
,@(delq nil
(mapcar
(lambda (arg) (if (mm-coding-system-p (nth 3 arg)) arg))
'((const :tag "UTF-8" utf-8)
(const :tag "iso-2022-7bit" iso-2022-7bit)
(const :tag "Emacs internal" emacs-mule)
(const :tag "escape-quoted" escape-quoted))))
(symbol :tag "Coding system")))