Mercurial > emacs

diff lisp/gnus/gnus-group.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 497f0d2ca551
children ef5d2ed6459e
line wrap: on
line diff
--- a/lisp/gnus/gnus-group.el	Mon Oct 04 23:00:13 2004 +0000
+++ b/lisp/gnus/gnus-group.el	Mon Oct 04 23:18:11 2004 +0000
@@ -1046,7 +1046,8 @@
       (gnus-group-insert-group-line "dummy.group" 0 nil 0 nil)
       (goto-char (point-min))
       (setq gnus-group-mark-positions
-	    (list (cons 'process (and (search-forward "\200" nil t)
+	    (list (cons 'process (and (search-forward
+				       (string-as-multibyte "\200") nil t)
 				      (- (point) 2))))))))
 
 (defun gnus-mouse-pick-group (e)