Mercurial > emacs
changeset 61644:aff89865e27c
Revision: miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-268
Merge from gnus--rel--5.10
Patches applied:
* gnus--rel--5.10 (patch 66)
- Update from CVS
2005-04-18 Katsumi Yamaoka <yamaoka@jpl.org>
* lisp/gnus/qp.el (quoted-printable-encode-region): Save excursion.
| author | Miles Bader <miles@gnu.org> |
|---|---|
| date | Tue, 19 Apr 2005 06:53:24 +0000 |
| parents | 7508a279dc7a |
| children | e4fc95d95925 042f282a2ed7 |
| files | lisp/gnus/ChangeLog lisp/gnus/qp.el |
| diffstat | 2 files changed, 10 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/gnus/ChangeLog Mon Apr 18 22:32:37 2005 +0000 +++ b/lisp/gnus/ChangeLog Tue Apr 19 06:53:24 2005 +0000 @@ -1,3 +1,7 @@ +2005-04-18 Katsumi Yamaoka <yamaoka@jpl.org> + + * qp.el (quoted-printable-encode-region): Save excursion. + 2005-04-13 Katsumi Yamaoka <yamaoka@jpl.org> * gnus-art.el (gnus-mime-inline-part): Use mm-string-to-multibyte.
--- a/lisp/gnus/qp.el Mon Apr 18 22:32:37 2005 +0000 +++ b/lisp/gnus/qp.el Tue Apr 19 06:53:24 2005 +0000 @@ -1,6 +1,7 @@ ;;; qp.el --- Quoted-Printable functions -;; Copyright (C) 1998, 1999, 2000, 2001, 2002, 2003 Free Software Foundation, Inc. +;; Copyright (C) 1998, 1999, 2000, 2001, 2002, 2003, 2005 +;; Free Software Foundation, Inc. ;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org> ;; Keywords: mail, extensions @@ -100,15 +101,15 @@ If `mm-use-ultra-safe-encoding' is set, fold lines unconditionally and encode lines starting with \"From\"." (interactive "r") - (goto-char from) - (if (re-search-forward (mm-string-to-multibyte "[^\x0-\x7f\x80-\xff]") - to t) - (error "Multibyte character in QP encoding region")) (unless class ;; Avoid using 8bit characters. = is \075. ;; Equivalent to "^\000-\007\013\015-\037\200-\377=" (setq class "\010-\012\014\040-\074\076-\177")) (save-excursion + (goto-char from) + (if (re-search-forward (mm-string-to-multibyte "[^\x0-\x7f\x80-\xff]") + to t) + (error "Multibyte character in QP encoding region")) (save-restriction (narrow-to-region from to) ;; Encode all the non-ascii and control characters.