/[emacs]/emacs/lisp/help-mode.el
ViewVC logotype

Diff of /emacs/lisp/help-mode.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.11 by rms, Sat Jan 12 21:00:17 2002 UTC revision 1.12 by walters, Wed Jun 12 04:54:54 2002 UTC
# Line 176  Commands: Line 176  Commands:
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)
# Line 206  Commands: Line 204  Commands:
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    
# Line 282  restore it properly when going back." Line 265  restore it properly when going back."
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

Legend:
Removed from v.1.11  
changed lines
  Added in v.1.12

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26