aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog16
-rw-r--r--lisp/info.el2
2 files changed, 11 insertions, 7 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 1ff3b7dfd67..d53201863b6 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,11 +1,15 @@
12001-07-13 Stefan Monnier <monnier@cs.yale.edu>
2
3 * info.el (Info-build-node-completions):
4 Make Info-current-file-completions buffer local.
5
12001-07-13 Gerd Moellmann <gerd@gnu.org> 62001-07-13 Gerd Moellmann <gerd@gnu.org>
2 7
3 * which-func.el (which-func-mode, which-func-ff-hook) 8 * which-func.el (which-func-mode, which-func-ff-hook)
4 (which-function-mode): Remove references to 9 (which-function-mode): Remove references to which-func-mode-global.
5 which-func-mode-global.
6 10
7 * calendar/cal-islam.el (calendar-goto-islamic-date): Add 11 * calendar/cal-islam.el (calendar-goto-islamic-date):
8 autoload cookie. 12 Add autoload cookie.
9 13
10 * play/fortune.el: Add types to defcustoms. 14 * play/fortune.el: Add types to defcustoms.
11 15
@@ -29,8 +33,8 @@
29 33
302001-07-11 Gerd Moellmann <gerd@gnu.org> 342001-07-11 Gerd Moellmann <gerd@gnu.org>
31 35
32 * mail/mail-extr.el (mail-extr-all-top-level-domains): Increase 36 * mail/mail-extr.el (mail-extr-all-top-level-domains):
33 the size of the obarray. 37 Increase the size of the obarray.
34 (mail-extr-all-top-level-domains): Add more toplevel domains, 38 (mail-extr-all-top-level-domains): Add more toplevel domains,
35 add more long names. 39 add more long names.
36 From: Per Starback <starback@ling.uu.se>. 40 From: Per Starback <starback@ling.uu.se>.
diff --git a/lisp/info.el b/lisp/info.el
index 301ad5ae606..d29f3c9d55c 100644
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -1124,7 +1124,7 @@ If FORK is a string, it is the name to use for the new buffer."
1124 (cons (list (match-string-no-properties 1)) 1124 (cons (list (match-string-no-properties 1))
1125 compl)))))))) 1125 compl))))))))
1126 (setq compl (cons '("*") compl)) 1126 (setq compl (cons '("*") compl))
1127 (setq Info-current-file-completions compl)))) 1127 (set (make-local-variable 'Info-current-file-completions) compl))))
1128 1128
1129(defun Info-restore-point (hl) 1129(defun Info-restore-point (hl)
1130 "If this node has been visited, restore the point value when we left." 1130 "If this node has been visited, restore the point value when we left."