diff options
| author | Richard M. Stallman | 1997-06-15 07:36:42 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1997-06-15 07:36:42 +0000 |
| commit | 91fe8c378e5f0fae2963fe5ff0ddfefa36ac86d8 (patch) | |
| tree | 99a143efa5a1f0fc98e2dc2c98e238ea404be887 | |
| parent | 9cc92f8bd384877226545371ec3345c1a9411923 (diff) | |
| download | emacs-91fe8c378e5f0fae2963fe5ff0ddfefa36ac86d8.tar.gz emacs-91fe8c378e5f0fae2963fe5ff0ddfefa36ac86d8.zip | |
(text-mode): Let all-white lines separate paragraphs.
| -rw-r--r-- | lisp/textmodes/text-mode.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/textmodes/text-mode.el b/lisp/textmodes/text-mode.el index b555d61a810..7e175fe9412 100644 --- a/lisp/textmodes/text-mode.el +++ b/lisp/textmodes/text-mode.el | |||
| @@ -58,7 +58,7 @@ inherit all the commands defined in this map.") | |||
| 58 | 58 | ||
| 59 | (defun text-mode () | 59 | (defun text-mode () |
| 60 | "Major mode for editing text written for humans to read. | 60 | "Major mode for editing text written for humans to read. |
| 61 | In this mode, paragraphs are delimited only by blank lines. | 61 | In this mode, paragraphs are delimited only by blank or white lines. |
| 62 | You can thus get the full benefit of adaptive filling | 62 | You can thus get the full benefit of adaptive filling |
| 63 | (see the variable `adaptive-fill-mode'). | 63 | (see the variable `adaptive-fill-mode'). |
| 64 | \\{text-mode-map} | 64 | \\{text-mode-map} |
| @@ -69,7 +69,7 @@ Turning on Text mode runs the normal hook `text-mode-hook'." | |||
| 69 | (setq local-abbrev-table text-mode-abbrev-table) | 69 | (setq local-abbrev-table text-mode-abbrev-table) |
| 70 | (set-syntax-table text-mode-syntax-table) | 70 | (set-syntax-table text-mode-syntax-table) |
| 71 | (make-local-variable 'paragraph-start) | 71 | (make-local-variable 'paragraph-start) |
| 72 | (setq paragraph-start (concat "$\\|" page-delimiter)) | 72 | (setq paragraph-start (concat "[ \t]*$\\|" page-delimiter)) |
| 73 | (make-local-variable 'paragraph-separate) | 73 | (make-local-variable 'paragraph-separate) |
| 74 | (setq paragraph-separate paragraph-start) | 74 | (setq paragraph-separate paragraph-start) |
| 75 | (setq mode-name "Text") | 75 | (setq mode-name "Text") |