Commit 4d01b827 authored by Glenn Morris's avatar Glenn Morris
Browse files

* mail/mail-utils.el (mail-unquote-printable-region): Doc fix.

parent ea92f9f3
2010-02-04 Glenn Morris <rgm@gnu.org> 2010-02-04 Glenn Morris <rgm@gnu.org>
* mail/mail-utils.el (mail-unquote-printable-region): Doc fix.
* simple.el (visual-line-mode): Capitalize lighter. * simple.el (visual-line-mode): Capitalize lighter.
2010-02-03 John Wiegley <jwiegley@gmail.com> 2010-02-03 John Wiegley <jwiegley@gmail.com>
......
...@@ -123,13 +123,16 @@ we expect to find and remove the wrapper characters =?ISO-8859-1?Q?....?=." ...@@ -123,13 +123,16 @@ we expect to find and remove the wrapper characters =?ISO-8859-1?Q?....?=."
(setq i (match-end 0))) (setq i (match-end 0)))
(apply 'concat (nreverse (cons (substring string i) strings)))))) (apply 'concat (nreverse (cons (substring string i) strings))))))
;; FIXME Gnus for some reason has `quoted-printable-decode-region' in qp.el.
;;;###autoload ;;;###autoload
(defun mail-unquote-printable-region (beg end &optional wrapper noerror (defun mail-unquote-printable-region (beg end &optional wrapper noerror
unibyte) unibyte)
"Undo the \"quoted printable\" encoding in buffer from BEG to END. "Undo the \"quoted printable\" encoding in buffer from BEG to END.
If the optional argument WRAPPER is non-nil, If the optional argument WRAPPER is non-nil,
we expect to find and remove the wrapper characters =?ISO-8859-1?Q?....?=. we expect to find and remove the wrapper characters =?ISO-8859-1?Q?....?=.
If NOERROR is non-nil, return t if successful. On encountering malformed quoted-printable text, exits with an error,
unless NOERROR is non-nil, in which case it continues, and returns nil
when finished. Returns non-nil on successful completion.
If UNIBYTE is non-nil, insert converted characters as unibyte. If UNIBYTE is non-nil, insert converted characters as unibyte.
That is useful if you are going to character code decoding afterward, That is useful if you are going to character code decoding afterward,
as Rmail does." as Rmail does."
...@@ -246,6 +249,10 @@ Return a modified address list." ...@@ -246,6 +249,10 @@ Return a modified address list."
"Prune addresses from DESTINATIONS, a list of recipient addresses. "Prune addresses from DESTINATIONS, a list of recipient addresses.
All addresses matching `rmail-dont-reply-to-names' are removed from All addresses matching `rmail-dont-reply-to-names' are removed from
the comma-separated list. The pruned list is returned." the comma-separated list. The pruned list is returned."
;; FIXME this (setting a user option the first time a command is used)
;; is somewhat strange. Normally one would never set the option,
;; but instead fall back to the default so long as it was nil.
;; Or just set the default directly in the defcustom.
(if (null rmail-dont-reply-to-names) (if (null rmail-dont-reply-to-names)
(setq rmail-dont-reply-to-names (setq rmail-dont-reply-to-names
(concat (if rmail-default-dont-reply-to-names (concat (if rmail-default-dont-reply-to-names
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment