[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/info.el
From: |
Eli Zaretskii |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/info.el |
Date: |
Sat, 20 May 2006 20:06:45 +0000 |
Index: emacs/lisp/info.el
diff -u emacs/lisp/info.el:1.483 emacs/lisp/info.el:1.484
--- emacs/lisp/info.el:1.483 Sat Apr 8 10:10:35 2006
+++ emacs/lisp/info.el Sat May 20 20:06:45 2006
@@ -2907,6 +2907,13 @@
manuals matches node nodes)
(let ((Info-fontify-maximum-menu-size nil))
(Info-directory)
+ ;; current-node and current-file are nil when they invoke info-apropos
+ ;; as the first Info command, i.e. info-apropos loads info.el. In that
+ ;; case, we use (DIR)Top instead, to avoid signalling an error after
+ ;; the search is complete.
+ (when (null current-node)
+ (setq current-file Info-current-file)
+ (setq current-node Info-current-node))
(message "Searching indices...")
(goto-char (point-min))
(re-search-forward "\\* Menu: *\n" nil t)
- [Emacs-diffs] Changes to emacs/lisp/info.el,
Eli Zaretskii <=