# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1204516652 0
# Node ID a72078644a4d61bee95f369443b748c179a31366
# Parent  0e803f4d8cd599c6ea7916f6f5987edd07275c02
(gnus-debug): Use mm-string-to-multibyte.

diff -r 0e803f4d8cd5 -r a72078644a4d lisp/gnus/ChangeLog
--- a/lisp/gnus/ChangeLog	Mon Mar 03 03:49:06 2008 +0000
+++ b/lisp/gnus/ChangeLog	Mon Mar 03 03:57:32 2008 +0000
@@ -1,5 +1,6 @@
 2008-03-03  Stefan Monnier  <monnier@iro.umontreal.ca>
 
+	* gnus-msg.el (gnus-debug):
 	* gnus-group.el (gnus-update-group-mark-positions):
 	Use mm-string-to-multibyte.
 
diff -r 0e803f4d8cd5 -r a72078644a4d lisp/gnus/gnus-msg.el
--- a/lisp/gnus/gnus-msg.el	Mon Mar 03 03:49:06 2008 +0000
+++ b/lisp/gnus/gnus-msg.el	Mon Mar 03 03:57:32 2008 +0000
@@ -1562,7 +1562,7 @@
     ;; 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
+    (while (re-search-forward (mm-string-to-multibyte
 			       "[\000-\010\013-\037\200-\237]") nil t)
       (replace-match (format "\\%03o" (string-to-char (match-string 0)))
 		     t t))))
@@ -2000,5 +2000,5 @@
 
 (provide 'gnus-msg)
 
-;;; arch-tag: 9f22b2f5-1c0a-49de-916e-4c88e984852b
+;; arch-tag: 9f22b2f5-1c0a-49de-916e-4c88e984852b
 ;;; gnus-msg.el ends here