Mercurial > emacs

diff lisp/gnus/message.el @ 57321:3381cb76bac3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* gnus-group.el (gnus-update-group-mark-positions): * gnus-sum.el (gnus-update-summary-mark-positions): * message.el (message-check-news-body-syntax): * gnus-msg.el (gnus-debug): Use `string-as-multibyte' to convert 8-bit unibyte values to a multibyte string for search functions.
author Juri Linkov <juri@jurta.org>
date Mon, 04 Oct 2004 23:18:11 +0000
parents c5e16264557d
children ef5d2ed6459e
line wrap: on
line diff
--- a/lisp/gnus/message.el	Mon Oct 04 23:00:13 2004 +0000
+++ b/lisp/gnus/message.el	Mon Oct 04 23:18:11 2004 +0000
@@ -4399,7 +4399,9 @@
 	     nil))))
    ;; Check for control characters.
    (message-check 'control-chars
-     (if (re-search-forward "[\000-\007\013\015-\032\034-\037\200-\237]" nil t)
+     (if (re-search-forward
+	  (string-as-multibyte "[\000-\007\013\015-\032\034-\037\200-\237]")
+	  nil t)
 	 (y-or-n-p
 	  "The article contains control characters.  Really post? ")
        t))