Mercurial > emacs
changeset 13504:1319330ca7ff
(lisp-mode-variables, lisp-fill-paragraph): Remove
"^" from paragraph-start and paragraph-separate. Moved
page-delimiter first in case it has a "^" also.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 11 Nov 1995 05:32:13 +0000 |
| parents | 726e91517ff6 |
| children | 86470b361571 |
| files | lisp/emacs-lisp/lisp-mode.el |
| diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emacs-lisp/lisp-mode.el Sat Nov 11 05:31:11 1995 +0000 +++ b/lisp/emacs-lisp/lisp-mode.el Sat Nov 11 05:32:13 1995 +0000 @@ -95,7 +95,7 @@ (set-syntax-table lisp-mode-syntax-table))) (setq local-abbrev-table lisp-mode-abbrev-table) (make-local-variable 'paragraph-start) - (setq paragraph-start (concat "^$\\|" page-delimiter)) + (setq paragraph-start (concat page-delimiter "\\|$" )) (make-local-variable 'paragraph-separate) (setq paragraph-separate paragraph-start) (make-local-variable 'paragraph-ignore-fill-prefix) @@ -731,8 +731,8 @@ (point))) ;; Lines with only semicolons on them can be paragraph boundaries. - (let ((paragraph-start (concat paragraph-start "\\|^[ \t;]*$")) - (paragraph-separate (concat paragraph-start "\\|^[ \t;]*$")) + (let ((paragraph-start (concat paragraph-start "\\|[ \t;]*$")) + (paragraph-separate (concat paragraph-start "\\|[ \t;]*$")) (fill-prefix comment-fill-prefix)) (fill-paragraph justify)))) t))