emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] Changes to emacs/lisp/help-mode.el


From: Colin Walters
Subject: [Emacs-diffs] Changes to emacs/lisp/help-mode.el
Date: Wed, 12 Jun 2002 00:54:54 -0400

Index: emacs/lisp/help-mode.el
diff -c emacs/lisp/help-mode.el:1.11 emacs/lisp/help-mode.el:1.12
*** emacs/lisp/help-mode.el:1.11        Sat Jan 12 16:00:17 2002
--- emacs/lisp/help-mode.el     Wed Jun 12 00:54:54 2002
***************
*** 176,183 ****
    (use-local-map help-mode-map)
    (setq mode-name "Help")
    (setq major-mode 'help-mode)
-   (make-local-variable 'font-lock-defaults)
-   (setq font-lock-defaults nil)         ; font-lock would defeat xref
    (view-mode)
    (make-local-variable 'view-no-disable-on-exit)
    (setq view-no-disable-on-exit t)
--- 176,181 ----
***************
*** 206,226 ****
  ;; similar should be done for widget doc strings, which currently use
  ;; another mechanism.
  
- (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)
- 
  (defvar help-back-label (purecopy "[back]")
    "Label to use by `help-make-xrefs' for the go-back reference.")
  
--- 204,209 ----
***************
*** 282,293 ****
  (defun help-make-xrefs (&optional buffer)
    "Parse and hyperlink documentation cross-references in the given BUFFER.
  
! Find cross-reference information in a buffer and, if
! `help-highlight-p' is non-nil, highlight it with face defined by
! `help-highlight-face'; activate such cross references for selection
! with `help-follow'.  Cross-references have the canonical form `...'
! and the type of reference may be disambiguated by the preceding
! word(s) used in `help-xref-symbol-regexp'.
  
  If the variable `help-xref-mule-regexp' is non-nil, find also
  cross-reference information related to multilingual environment
--- 265,275 ----
  (defun help-make-xrefs (&optional buffer)
    "Parse and hyperlink documentation cross-references in the given BUFFER.
  
! Find cross-reference information in a buffer and activate such cross
! references for selection with `help-follow'.  Cross-references have
! the canonical form `...'  and the type of reference may be
! disambiguated by the preceding word(s) used in
! `help-xref-symbol-regexp'.
  
  If the variable `help-xref-mule-regexp' is non-nil, find also
  cross-reference information related to multilingual environment



reply via email to

[Prev in Thread] Current Thread [Next in Thread]