# HG changeset patch
# User Micha¸«³l Cadilhac <michael.cadilhac@lrde.org>
# Date 1166991626 0
# Node ID 9ac7844e1b6ea8718b74c0bc24ce8719c576c233
# Parent  07d2226171a021a4233ffa3550a3552d19b62746
(fill-comment-paragraph): Prevent the use of an optimized comment regexp if
`comment-start-skip' uses a ^.

diff -r 07d2226171a0 -r 9ac7844e1b6e lisp/textmodes/fill.el
--- a/lisp/textmodes/fill.el	Sun Dec 24 17:31:20 2006 +0000
+++ b/lisp/textmodes/fill.el	Sun Dec 24 20:20:26 2006 +0000
@@ -838,7 +838,7 @@
 	     (commark
 	      (comment-string-strip (buffer-substring comstart comin) nil t))
 	     (comment-re
-	      (if (string-match comment-start-skip (concat commark "a"))
+	      (if (string-match comment-start-skip (concat "\0" commark "a"))
 		  (concat "[ \t]*" (regexp-quote commark)
 			  ;; Make sure we only match comments that use
 			  ;; the exact same comment marker.