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

[Richard M . Stallman]

Index: emacs/lisp/info.el
diff -c emacs/lisp/info.el:1.402 emacs/lisp/info.el:1.403
*** emacs/lisp/info.el:1.402    Tue Oct  5 04:23:17 2004
--- emacs/lisp/info.el  Wed Oct 13 02:09:57 2004
***************
*** 79,86 ****
    :group 'info)
  
  (defface info-xref
!   '((((class color) (background light)) :foreground "blue")
!     (((class color) (background dark)) :foreground "cyan")
      (t :underline t))
    "Face for Info cross-references."
    :group 'info)
--- 79,86 ----
    :group 'info)
  
  (defface info-xref
!   '((((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,460 ****
--- 455,461 ----
  
  ;;;###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,3266 ****
--- 3262,3268 ----
                           (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))