Mercurial > emacs
comparison lisp/textmodes/sgml-mode.el @ 24463:9ef31386cb47
(html-mode): Use sentence-end-double-space when setting sentence-end.
author | Dave Love <fx@gnu.org> |
---|---|
date | Tue, 09 Mar 1999 19:24:33 +0000 |
parents | e2c5b1571392 |
children | d2a4359531e0 |
comparison
equal
deleted
inserted
replaced
24462:9c3beaed253e | 24463:9ef31386cb47 |
---|---|
1195 (make-local-variable 'outline-regexp) | 1195 (make-local-variable 'outline-regexp) |
1196 (make-local-variable 'outline-heading-end-regexp) | 1196 (make-local-variable 'outline-heading-end-regexp) |
1197 (make-local-variable 'outline-level) | 1197 (make-local-variable 'outline-level) |
1198 (make-local-variable 'sentence-end) | 1198 (make-local-variable 'sentence-end) |
1199 (setq sentence-end | 1199 (setq sentence-end |
1200 "[.?!][]\"')}]*\\(<[^>]*>\\)*\\($\\| $\\|\t\\| \\)[ \t\n]*") | 1200 (if sentence-end-double-space |
1201 "[.?!][]\"')}]*\\(<[^>]*>\\)*\\($\\| $\\|\t\\| \\)[ \t\n]*" | |
1202 | |
1203 "[.?!][]\"')}]*\\(<[^>]*>\\)*\\($\\| \\|\t\\)[ \t\n]*")) | |
1201 (setq sgml-tag-alist html-tag-alist | 1204 (setq sgml-tag-alist html-tag-alist |
1202 sgml-face-tag-alist html-face-tag-alist | 1205 sgml-face-tag-alist html-face-tag-alist |
1203 sgml-tag-help html-tag-help | 1206 sgml-tag-help html-tag-help |
1204 outline-regexp "^.*<[Hh][1-6]\\>" | 1207 outline-regexp "^.*<[Hh][1-6]\\>" |
1205 outline-heading-end-regexp "</[Hh][1-6]>" | 1208 outline-heading-end-regexp "</[Hh][1-6]>" |