From d73c9bcb7913270fe7c8c3eb6f0904889c8cbbb7 Mon Sep 17 00:00:00 2001 From: Juri Linkov Date: Fri, 17 Feb 2006 21:55:44 +0000 Subject: [PATCH] (Info-search): Skip `Local Variables' node. --- lisp/ChangeLog | 11 +++++++++++ lisp/info.el | 6 ++++-- 2 files changed, 15 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 3aa80e6446b..6efd2366320 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,14 @@ +2006-02-17 Juri Linkov + + * ffap.el (ffap) : Add explicit face declaration. + (ffap-highlight): Use face `ffap' directly instead of checking + for its existence. + + * icomplete.el (icomplete-get-keys): Use `t' for the second arg + `visible-ok' of `other-buffer' to find the right original buffer. + + * info.el (Info-search): Skip `Local Variables' node. + 2006-02-17 Juri Linkov * info.el (Info-find-file): Check for symbols `apropos', `history', diff --git a/lisp/info.el b/lisp/info.el index e2baa3aa583..e9d7f5ca2de 100644 --- a/lisp/info.el +++ b/lisp/info.el @@ -1640,7 +1640,8 @@ If DIRECTION is `backward', search in the reverse direction." ;; Skip Tag Table node (save-excursion (and (search-backward "\^_" nil t) - (looking-at "\^_\nTag Table")))))) + (looking-at + "\^_\n\\(Tag Table\\|Local Variables\\)")))))) (let ((search-spaces-regexp Info-search-whitespace-regexp)) (if (if backward (re-search-backward regexp bound t) @@ -1728,7 +1729,8 @@ If DIRECTION is `backward', search in the reverse direction." ;; Skip Tag Table node (save-excursion (and (search-backward "\^_" nil t) - (looking-at "\^_\nTag Table")))))) + (looking-at + "\^_\n\\(Tag Table\\|Local Variables\\)")))))) (let ((search-spaces-regexp Info-search-whitespace-regexp)) (if (if backward (re-search-backward regexp nil t) -- 2.39.2