changeset 74883:9ac7844e1b6e

(fill-comment-paragraph): Prevent the use of an optimized comment regexp if `comment-start-skip' uses a ^.
author Michaël Cadilhac <michael.cadilhac@lrde.org>
date Sun, 24 Dec 2006 20:20:26 +0000
parents 07d2226171a0
children 4e73ffacb0df
files lisp/textmodes/fill.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- 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.