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

[Miles Bader]

Index: emacs/lisp/gnus/gnus-msg.el
diff -c emacs/lisp/gnus/gnus-msg.el:1.24 emacs/lisp/gnus/gnus-msg.el:1.25
*** emacs/lisp/gnus/gnus-msg.el:1.24    Mon Oct  4 23:18:11 2004
--- emacs/lisp/gnus/gnus-msg.el Thu Oct  7 05:53:40 2004
***************
*** 1534,1540 ****
      ;; Remove any control chars - they seem to cause trouble for some
      ;; mailers.  (Byte-compiled output from the stuff above.)
      (goto-char point)
!     (while (re-search-forward (string-as-multibyte
                               "[\000-\010\013-\037\200-\237]") nil t)
        (replace-match (format "\\%03o" (string-to-char (match-string 0)))
                     t t))))
--- 1534,1540 ----
      ;; Remove any control chars - they seem to cause trouble for some
      ;; mailers.  (Byte-compiled output from the stuff above.)
      (goto-char point)
!     (while (re-search-forward (mm-string-as-multibyte
                               "[\000-\010\013-\037\200-\237]") nil t)
        (replace-match (format "\\%03o" (string-to-char (match-string 0)))
                     t t))))