Mercurial > emacs
comparison lisp/man.el @ 86130:e55a87ac8167
(Man-heading-regexp): Add 0-9.
(Man-first-heading-regexp): Remove leading space [ \t]* before NAME.
author | Juri Linkov <juri@jurta.org> |
---|---|
date | Fri, 16 Nov 2007 01:18:50 +0000 |
parents | d2335a891526 |
children | a5e1b70f3ddf |
comparison
equal
deleted
inserted
replaced
86129:4805df3408b9 | 86130:e55a87ac8167 |
---|---|
262 "(\\(" Man-section-regexp "\\))\\)$") | 262 "(\\(" Man-section-regexp "\\))\\)$") |
263 (concat "^[ \t]*\\(" Man-name-regexp | 263 (concat "^[ \t]*\\(" Man-name-regexp |
264 "(\\(" Man-section-regexp "\\))\\).*\\1")) | 264 "(\\(" Man-section-regexp "\\))\\).*\\1")) |
265 "Regular expression describing the heading of a page.") | 265 "Regular expression describing the heading of a page.") |
266 | 266 |
267 (defvar Man-heading-regexp "^\\([A-Z][A-Z /-]+\\)$" | 267 (defvar Man-heading-regexp "^\\([A-Z][A-Z0-9 /-]+\\)$" |
268 "Regular expression describing a manpage heading entry.") | 268 "Regular expression describing a manpage heading entry.") |
269 | 269 |
270 (defvar Man-see-also-regexp "SEE ALSO" | 270 (defvar Man-see-also-regexp "SEE ALSO" |
271 "Regular expression for SEE ALSO heading (or your equivalent). | 271 "Regular expression for SEE ALSO heading (or your equivalent). |
272 This regexp should not start with a `^' character.") | 272 This regexp should not start with a `^' character.") |
273 | 273 |
274 (defvar Man-first-heading-regexp "^[ \t]*NAME$\\|^[ \t]*No manual entry fo.*$" | 274 ;; This used to have leading space [ \t]*, but was removed because it |
275 ;; causes false page splits on an occasional NAME with leading space | |
276 ;; inside a manpage. And `Man-heading-regexp' doesn't have [ \t]* anyway. | |
277 (defvar Man-first-heading-regexp "^NAME$\\|^[ \t]*No manual entry fo.*$" | |
275 "Regular expression describing first heading on a manpage. | 278 "Regular expression describing first heading on a manpage. |
276 This regular expression should start with a `^' character.") | 279 This regular expression should start with a `^' character.") |
277 | 280 |
278 (defvar Man-reference-regexp | 281 (defvar Man-reference-regexp |
279 (concat "\\(" Man-name-regexp "\\)[ \t]*(\\(" Man-section-regexp "\\))") | 282 (concat "\\(" Man-name-regexp "\\)[ \t]*(\\(" Man-section-regexp "\\))") |