(text-mode): Contruct paragraph-start so

that the leading `^' is at the start.  This is necessary because
paragraphs.el tries to remove anchors, but can find them only if
they are the first character.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 7ce214c8d22448e932677191a31f9c641de6f649..02263d03ff445522f3f3b9dc47b059bcea01ba58 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,10 @@
 1999-11-22  Gerd Moellmann  <gerd@gnu.org>
 
+       * textmodes/text-mode.el (text-mode): Contruct paragraph-start so
+       that the leading `^' is at the start.  This is necessary because
+       paragraphs.el tries to remove anchors, but can find them only if
+       they are the first character.
+
        * progmodes/antlr-mode.el: New file.
 
        * calendar/calendar.el: Fix autoload for

diff --git a/lisp/textmodes/text-mode.el b/lisp/textmodes/text-mode.el
index c0627b640f466a4343d8d491746cc1e93fe21f69..0c4be23ab606dd605328604f20bac538e94830b2 100644 (file)
--- a/lisp/textmodes/text-mode.el
+++ b/lisp/textmodes/text-mode.el
@@ -75,7 +75,7 @@ Turning on Text mode runs the normal hook `text-mode-hook'."
   (setq local-abbrev-table text-mode-abbrev-table)
   (set-syntax-table text-mode-syntax-table)
   (make-local-variable 'paragraph-start)
-  (setq paragraph-start (concat "[ \t]*$\\|" page-delimiter))
+  (setq paragraph-start (concat page-delimiter "\\|[ \t]*$"))
   (make-local-variable 'paragraph-separate)
   (setq paragraph-separate paragraph-start)
   (make-local-variable 'indent-line-function)