procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(info-xref): Add underlining.

Browse source 
(info): Add info-file property.
(Info-find-emacs-command-nodes): Specify case-sensitive search.
This commit is contained in:
Richard M. Stallman 2004-10-13 02:09:57 +00:00
parent 3bfb0bff7b
commit cc3f6c32b9
1 changed files with 4 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/info.el
View file

@ -79,8 +79,8 @@ The Lisp code is executed when the node is selected.")
:group 'info)
(defface info-xref
'((((class color) (background light)) :foreground "blue")
(((class color) (background dark)) :foreground "cyan")
'((((class color) (background light)) :foreground "blue" :underline t)
(((class color) (background dark)) :foreground "cyan" :underline t)
(t :underline t))
"Face for Info cross-references."
:group 'info)
@ -455,6 +455,7 @@ Do the right thing if the file has been compressed or zipped."
;;;###autoload (add-hook 'same-window-regexps "\\*info\\*\\(\\|<[0-9]+>\\)")
;;;###autoload (put 'info 'info-file "emacs")
;;;###autoload
(defun info (&optional file buffer)
"Enter Info, the documentation browser.
@ -3261,6 +3262,7 @@ The locations are of the format used in `Info-history', i.e.
(car elt)
elt))
(file (if (consp elt) (cdr elt) elt))
(case-fold-search nil)
(regexp (concat "\\`" (regexp-quote name)
"\\(\\'\\|-\\)")))
(if (string-match regexp (symbol-name command))