changeset 4744:ea4df8504763

(indented-text-mode): Make only blank lines separate or start paragraphs. Doc fix.
author Richard M. Stallman <rms@gnu.org>
date Sun, 19 Sep 1993 19:32:35 +0000
parents f05c414fe229
children 083140e4419f
files lisp/textmodes/text-mode.el
diffstat 1 files changed, 8 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- 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)