aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorStefan Monnier2003-01-19 00:19:44 +0000
committerStefan Monnier2003-01-19 00:19:44 +0000
commitffb6ced1ce4324a1ef7a1a1cef3bc2de58865a0e (patch)
treeb0f16a1e20b0e0892f2a3f933265bb7d3b520bae
parent9028b39e362f8bce80b9e04529ef305e2fb7a449 (diff)
downloademacs-ffb6ced1ce4324a1ef7a1a1cef3bc2de58865a0e.tar.gz
emacs-ffb6ced1ce4324a1ef7a1a1cef3bc2de58865a0e.zip
(fill-comment-paragraph): Fix simplistic regexp-concatenation.
-rw-r--r--lisp/textmodes/fill.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/textmodes/fill.el b/lisp/textmodes/fill.el
index 111cc10ab35..f58a2bb53cc 100644
--- a/lisp/textmodes/fill.el
+++ b/lisp/textmodes/fill.el
@@ -807,7 +807,7 @@ can take care of filling. JUSTIFY is used as in `fill-paragraph'."
807 (looking-at comment-re))) 807 (looking-at comment-re)))
808 ;; We may have gone too far. Go forward again. 808 ;; We may have gone too far. Go forward again.
809 (line-beginning-position 809 (line-beginning-position
810 (if (looking-at (concat ".*" comment-start-skip)) 810 (if (looking-at (concat ".*\\(?:" comment-start-skip "\\)"))
811 1 2)))) 811 1 2))))
812 ;; Find the beginning of the first line past the region to fill. 812 ;; Find the beginning of the first line past the region to fill.
813 (save-excursion 813 (save-excursion