diff options
| author | Alan Mackenzie | 2009-01-05 21:22:20 +0000 |
|---|---|---|
| committer | Alan Mackenzie | 2009-01-05 21:22:20 +0000 |
| commit | 49be4f8800b854f19cfbccc5aeeef92330d6b2ea (patch) | |
| tree | 785a98bd2b9f4b299243178fd00cfe226a3e2a1e | |
| parent | ac4e7a307ffeab0dfa92f1dfde60dba7b4f52725 (diff) | |
| download | emacs-49be4f8800b854f19cfbccc5aeeef92330d6b2ea.tar.gz emacs-49be4f8800b854f19cfbccc5aeeef92330d6b2ea.zip | |
(c-setup-paragraph-variables): Ensure paragraph-\(start\|separate\) match
blank lines. For AWK Mode.
| -rw-r--r-- | lisp/progmodes/cc-styles.el | 17 |
1 files changed, 12 insertions, 5 deletions
diff --git a/lisp/progmodes/cc-styles.el b/lisp/progmodes/cc-styles.el index d86afdc566f..6e422ec0266 100644 --- a/lisp/progmodes/cc-styles.el +++ b/lisp/progmodes/cc-styles.el | |||
| @@ -510,14 +510,21 @@ variables." | |||
| 510 | (assoc 'other c-comment-prefix-regexp))) | 510 | (assoc 'other c-comment-prefix-regexp))) |
| 511 | c-comment-prefix-regexp)) | 511 | c-comment-prefix-regexp)) |
| 512 | 512 | ||
| 513 | (let ((comment-line-prefix | 513 | (let* ((empty-is-prefix (string-match c-current-comment-prefix "")) |
| 514 | (concat "[ \t]*\\(" c-current-comment-prefix "\\)[ \t]*"))) | 514 | (nonws-comment-line-prefix |
| 515 | 515 | (concat "\\(" c-current-comment-prefix "\\)[ \t]*")) | |
| 516 | (setq paragraph-start (concat comment-line-prefix | 516 | (comment-line-prefix (concat "[ \t]*" nonws-comment-line-prefix)) |
| 517 | (blank-or-comment-line-prefix | ||
| 518 | (concat "[ \t]*" | ||
| 519 | (if empty-is-prefix "" "\\(") | ||
| 520 | nonws-comment-line-prefix | ||
| 521 | (if empty-is-prefix "" "\\)?")))) | ||
| 522 | |||
| 523 | (setq paragraph-start (concat blank-or-comment-line-prefix | ||
| 517 | c-paragraph-start | 524 | c-paragraph-start |
| 518 | "\\|" | 525 | "\\|" |
| 519 | page-delimiter) | 526 | page-delimiter) |
| 520 | paragraph-separate (concat comment-line-prefix | 527 | paragraph-separate (concat blank-or-comment-line-prefix |
| 521 | c-paragraph-separate | 528 | c-paragraph-separate |
| 522 | "\\|" | 529 | "\\|" |
| 523 | page-delimiter) | 530 | page-delimiter) |