]> git.eshelyaron.com Git - emacs.git/commitdiff
(c-setup-paragraph-variables): Ensure paragraph-\(start\|separate\) match
authorAlan Mackenzie <acm@muc.de>
Mon, 5 Jan 2009 21:22:20 +0000 (21:22 +0000)
committerAlan Mackenzie <acm@muc.de>
Mon, 5 Jan 2009 21:22:20 +0000 (21:22 +0000)
blank lines.  For AWK Mode.

lisp/progmodes/cc-styles.el

index d86afdc566f37fa0faa23fab79092f03500d8689..6e422ec0266d2b3671a468a05518f2fc3a80e0a6 100644 (file)
@@ -510,14 +510,21 @@ variables."
                          (assoc 'other c-comment-prefix-regexp)))
          c-comment-prefix-regexp))
 
-  (let ((comment-line-prefix
-        (concat "[ \t]*\\(" c-current-comment-prefix "\\)[ \t]*")))
-
-    (setq paragraph-start (concat comment-line-prefix
+  (let* ((empty-is-prefix (string-match c-current-comment-prefix ""))
+        (nonws-comment-line-prefix
+         (concat "\\(" c-current-comment-prefix "\\)[ \t]*"))
+        (comment-line-prefix (concat "[ \t]*" nonws-comment-line-prefix))
+        (blank-or-comment-line-prefix
+         (concat "[ \t]*"
+                 (if empty-is-prefix "" "\\(")
+                 nonws-comment-line-prefix
+                 (if empty-is-prefix "" "\\)?"))))
+
+    (setq paragraph-start (concat blank-or-comment-line-prefix
                                  c-paragraph-start
                                  "\\|"
                                  page-delimiter)
-         paragraph-separate (concat comment-line-prefix
+         paragraph-separate (concat blank-or-comment-line-prefix
                                     c-paragraph-separate
                                     "\\|"
                                     page-delimiter)