Mercurial > emacs
comparison lisp/textmodes/text-mode.el @ 26544:1551195f02c3
(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.
| author | Gerd Moellmann <gerd@gnu.org> |
|---|---|
| date | Mon, 22 Nov 1999 16:13:49 +0000 |
| parents | 3f3121176533 |
| children | 7c28a5765af4 |
comparison
equal
deleted
inserted
replaced
| 26543:c84c8d663642 | 26544:1551195f02c3 |
|---|---|
| 73 (kill-all-local-variables) | 73 (kill-all-local-variables) |
| 74 (use-local-map text-mode-map) | 74 (use-local-map text-mode-map) |
| 75 (setq local-abbrev-table text-mode-abbrev-table) | 75 (setq local-abbrev-table text-mode-abbrev-table) |
| 76 (set-syntax-table text-mode-syntax-table) | 76 (set-syntax-table text-mode-syntax-table) |
| 77 (make-local-variable 'paragraph-start) | 77 (make-local-variable 'paragraph-start) |
| 78 (setq paragraph-start (concat "[ \t]*$\\|" page-delimiter)) | 78 (setq paragraph-start (concat page-delimiter "\\|[ \t]*$")) |
| 79 (make-local-variable 'paragraph-separate) | 79 (make-local-variable 'paragraph-separate) |
| 80 (setq paragraph-separate paragraph-start) | 80 (setq paragraph-separate paragraph-start) |
| 81 (make-local-variable 'indent-line-function) | 81 (make-local-variable 'indent-line-function) |
| 82 (setq indent-line-function 'indent-relative-maybe) | 82 (setq indent-line-function 'indent-relative-maybe) |
| 83 (setq mode-name "Text") | 83 (setq mode-name "Text") |