176 |
(use-local-map help-mode-map) |
(use-local-map help-mode-map) |
177 |
(setq mode-name "Help") |
(setq mode-name "Help") |
178 |
(setq major-mode 'help-mode) |
(setq major-mode 'help-mode) |
|
(make-local-variable 'font-lock-defaults) |
|
|
(setq font-lock-defaults nil) ; font-lock would defeat xref |
|
179 |
(view-mode) |
(view-mode) |
180 |
(make-local-variable 'view-no-disable-on-exit) |
(make-local-variable 'view-no-disable-on-exit) |
181 |
(setq view-no-disable-on-exit t) |
(setq view-no-disable-on-exit t) |
204 |
;; similar should be done for widget doc strings, which currently use |
;; similar should be done for widget doc strings, which currently use |
205 |
;; another mechanism. |
;; another mechanism. |
206 |
|
|
|
(defcustom help-highlight-p t |
|
|
"*If non-nil, `help-make-xrefs' highlight cross-references. |
|
|
Under a window system it highlights them with face defined by |
|
|
`help-highlight-face'." |
|
|
:group 'help |
|
|
:version "20.3" |
|
|
:type 'boolean) |
|
|
|
|
|
(defcustom help-highlight-face 'underline |
|
|
"Face used by `help-make-xrefs' to highlight cross-references. |
|
|
Must be previously-defined." |
|
|
:group 'help |
|
|
:version "20.3" |
|
|
:type 'face) |
|
|
|
|
207 |
(defvar help-back-label (purecopy "[back]") |
(defvar help-back-label (purecopy "[back]") |
208 |
"Label to use by `help-make-xrefs' for the go-back reference.") |
"Label to use by `help-make-xrefs' for the go-back reference.") |
209 |
|
|
265 |
(defun help-make-xrefs (&optional buffer) |
(defun help-make-xrefs (&optional buffer) |
266 |
"Parse and hyperlink documentation cross-references in the given BUFFER. |
"Parse and hyperlink documentation cross-references in the given BUFFER. |
267 |
|
|
268 |
Find cross-reference information in a buffer and, if |
Find cross-reference information in a buffer and activate such cross |
269 |
`help-highlight-p' is non-nil, highlight it with face defined by |
references for selection with `help-follow'. Cross-references have |
270 |
`help-highlight-face'; activate such cross references for selection |
the canonical form `...' and the type of reference may be |
271 |
with `help-follow'. Cross-references have the canonical form `...' |
disambiguated by the preceding word(s) used in |
272 |
and the type of reference may be disambiguated by the preceding |
`help-xref-symbol-regexp'. |
|
word(s) used in `help-xref-symbol-regexp'. |
|
273 |
|
|
274 |
If the variable `help-xref-mule-regexp' is non-nil, find also |
If the variable `help-xref-mule-regexp' is non-nil, find also |
275 |
cross-reference information related to multilingual environment |
cross-reference information related to multilingual environment |