Mercurial > emacs
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)