# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 748467155 0
# Node ID ea4df85047630c2efa62a4f6c8a69c1281817ff2
# Parent  f05c414fe229b521e668a45bd89fb4e3de71e903
(indented-text-mode): Make only blank lines
separate or start paragraphs.  Doc fix.

diff -r f05c414fe229 -r ea4df8504763 lisp/textmodes/text-mode.el
--- a/lisp/textmodes/text-mode.el	Sun Sep 19 19:28:39 1993 +0000
+++ b/lisp/textmodes/text-mode.el	Sun Sep 19 19:32:35 1993 +0000
@@ -87,7 +87,10 @@
     (setq indented-text-mode-map (nconc newmap text-mode-map))))
 
 (defun indented-text-mode ()
-  "Major mode for editing indented text intended for humans to read.
+  "Major mode for editing text with indented paragraphs.
+In this mode, paragraphs are delimited only by blank lines.
+You can thus get the benefit of adaptive filling
+ (see the variable `adaptive-fill-mode').
 \\{indented-text-mode-map}
 Turning on `indented-text-mode' calls the value of the variable
 `text-mode-hook', if that value is non-nil."
@@ -99,6 +102,10 @@
   (set-syntax-table text-mode-syntax-table)
   (make-local-variable 'indent-line-function)
   (setq indent-line-function 'indent-relative-maybe)
+  (make-local-variable 'paragraph-start)
+  (setq paragraph-start (concat "^$\\|" page-delimiter))
+  (make-local-variable 'paragraph-separate)
+  (setq paragraph-separate paragraph-start)
   (use-local-map indented-text-mode-map)
   (setq mode-name "Indented Text")
   (setq major-mode 'indented-text-mode)