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

[Juanma Barranquero]

Index: emacs/lisp/info-look.el
diff -c emacs/lisp/info-look.el:1.32 emacs/lisp/info-look.el:1.33
*** emacs/lisp/info-look.el:1.32        Sat Apr  5 07:58:02 2003
--- emacs/lisp/info-look.el     Sun May 11 11:27:15 2003
***************
*** 1,7 ****
  ;;; info-look.el --- major-mode-sensitive Info index lookup facility
  ;; An older version of this was known as libc.el.
  
! ;; Copyright (C) 1995,96,97,98,99,2001  Free Software Foundation, Inc.
  
  ;; Author: Ralph Schleicher <address@hidden>
  ;;         (did not show signs of life (Nov 2001)  -stef)
--- 1,7 ----
  ;;; info-look.el --- major-mode-sensitive Info index lookup facility
  ;; An older version of this was known as libc.el.
  
! ;; Copyright (C) 1995,96,97,98,99,2001,2003  Free Software Foundation, Inc.
  
  ;; Author: Ralph Schleicher <address@hidden>
  ;;         (did not show signs of life (Nov 2001)  -stef)
***************
*** 468,474 ****
              (progn
                (goto-char (point-min))
                (and (search-forward "\n* Menu:" nil t)
!                    (while (re-search-forward "\n\\* \\([^:\t\n]*\\):" nil t)
                       (setq entry (match-string 1)
                             item (funcall trans entry))
                       ;; `trans' can return nil if the regexp doesn't match.
--- 468,474 ----
              (progn
                (goto-char (point-min))
                (and (search-forward "\n* Menu:" nil t)
!                    (while (re-search-forward "\n\\* \\(.*\\): " nil t)
                       (setq entry (match-string 1)
                             item (funcall trans entry))
                       ;; `trans' can return nil if the regexp doesn't match.