From 763d157993da52634f57506a78141701d44aec49 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sat, 11 Nov 1995 05:32:13 +0000 Subject: [PATCH] (lisp-mode-variables, lisp-fill-paragraph): Remove "^" from paragraph-start and paragraph-separate. Moved page-delimiter first in case it has a "^" also. --- lisp/emacs-lisp/lisp-mode.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el index ab08912cad7..d8eaca3c808 100644 --- a/lisp/emacs-lisp/lisp-mode.el +++ b/lisp/emacs-lisp/lisp-mode.el @@ -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 @@ and initial semicolons." (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)) -- 2.39.2