emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] Changes to emacs/lisp/gnus/qp.el


From: Miles Bader
Subject: [Emacs-diffs] Changes to emacs/lisp/gnus/qp.el
Date: Tue, 19 Apr 2005 02:53:29 -0400

Index: emacs/lisp/gnus/qp.el
diff -c emacs/lisp/gnus/qp.el:1.16 emacs/lisp/gnus/qp.el:1.17
*** emacs/lisp/gnus/qp.el:1.16  Wed Apr 13 21:38:05 2005
--- emacs/lisp/gnus/qp.el       Tue Apr 19 06:53:24 2005
***************
*** 1,6 ****
  ;;; qp.el --- Quoted-Printable functions
  
! ;; Copyright (C) 1998, 1999, 2000, 2001, 2002, 2003 Free Software Foundation, 
Inc.
  
  ;; Author: Lars Magne Ingebrigtsen <address@hidden>
  ;; Keywords: mail, extensions
--- 1,7 ----
  ;;; qp.el --- Quoted-Printable functions
  
! ;; Copyright (C) 1998, 1999, 2000, 2001, 2002, 2003, 2005
! ;;        Free Software Foundation, Inc.
  
  ;; Author: Lars Magne Ingebrigtsen <address@hidden>
  ;; Keywords: mail, extensions
***************
*** 100,114 ****
  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
      (save-restriction
        (narrow-to-region from to)
        ;; Encode all the non-ascii and control characters.
--- 101,115 ----
  If `mm-use-ultra-safe-encoding' is set, fold lines unconditionally and
  encode lines starting with \"From\"."
    (interactive "r")
    (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.




reply via email to

[Prev in Thread] Current Thread [Next in Thread]