diff options
| author | Richard M. Stallman | 2005-10-21 18:58:08 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2005-10-21 18:58:08 +0000 |
| commit | bb66398d919f8014bfd0f4732e6f276eec5c13f3 (patch) | |
| tree | 5f6a97436af86e128dcb25867cfaf627ec7c32ab | |
| parent | f4b80eb14c8cd969c80cb68ff9508d9e7011db22 (diff) | |
| download | emacs-bb66398d919f8014bfd0f4732e6f276eec5c13f3.tar.gz emacs-bb66398d919f8014bfd0f4732e6f276eec5c13f3.zip | |
(texinfo-mode): Set sentence-end-base.
| -rw-r--r-- | lisp/ChangeLog | 7 | ||||
| -rw-r--r-- | lisp/textmodes/texinfo.el | 3 |
2 files changed, 10 insertions, 0 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 2a83266af32..185c9ec9438 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,10 @@ | |||
| 1 | 2005-10-21 Richard M. Stallman <rms@gnu.org> | ||
| 2 | |||
| 3 | * textmodes/texinfo.el (texinfo-mode): Set sentence-end-base. | ||
| 4 | |||
| 5 | * textmodes/paragraphs.el (sentence-end-base): New variable. | ||
| 6 | (sentence-end): Use sentence-end-base. | ||
| 7 | |||
| 1 | 2005-10-21 Stefan Monnier <monnier@iro.umontreal.ca> | 8 | 2005-10-21 Stefan Monnier <monnier@iro.umontreal.ca> |
| 2 | 9 | ||
| 3 | * font-lock.el (font-lock-default-fontify-region): Check the multiline | 10 | * font-lock.el (font-lock-default-fontify-region): Check the multiline |
diff --git a/lisp/textmodes/texinfo.el b/lisp/textmodes/texinfo.el index a0dec653165..3507f6e57cf 100644 --- a/lisp/textmodes/texinfo.el +++ b/lisp/textmodes/texinfo.el | |||
| @@ -593,6 +593,9 @@ value of `texinfo-mode-hook'." | |||
| 593 | (concat "\b\\|@[a-zA-Z]*[ \n]\\|" paragraph-separate)) | 593 | (concat "\b\\|@[a-zA-Z]*[ \n]\\|" paragraph-separate)) |
| 594 | (make-local-variable 'paragraph-start) | 594 | (make-local-variable 'paragraph-start) |
| 595 | (setq paragraph-start (concat "\b\\|@[a-zA-Z]*[ \n]\\|" paragraph-start)) | 595 | (setq paragraph-start (concat "\b\\|@[a-zA-Z]*[ \n]\\|" paragraph-start)) |
| 596 | (make-local-variable 'sentence-end-base) | ||
| 597 | (setq sentence-end-base | ||
| 598 | "\\(@\\(end\\)?dots{}\\|[.?!]\\)[]\"'\xd0c9\x5397d)}]*") | ||
| 596 | (make-local-variable 'adaptive-fill-mode) | 599 | (make-local-variable 'adaptive-fill-mode) |
| 597 | (setq adaptive-fill-mode nil) | 600 | (setq adaptive-fill-mode nil) |
| 598 | (make-local-variable 'fill-column) | 601 | (make-local-variable 'fill-column) |