# HG changeset patch # User Richard M. Stallman # Date 816067933 0 # Node ID 1319330ca7ffac398f495ee2c25290de4e28c43a # Parent 726e91517ff6bb5d46187e9851c95d1eb43ba26e (lisp-mode-variables, lisp-fill-paragraph): Remove "^" from paragraph-start and paragraph-separate. Moved page-delimiter first in case it has a "^" also. diff -r 726e91517ff6 -r 1319330ca7ff lisp/emacs-lisp/lisp-mode.el --- 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))