From: Juri Linkov <juri@jurta.org>
Date: Thu, 14 Feb 2013 09:15:55 +0000 (+0200)
Subject: * lisp/info.el (Info-isearch-filter): Treat non-nil values of
X-Git-Tag: emacs-24.3.90~173^2~7^2~43
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f6b6e113913293907433b21a7d8295f4bc53077e;p=emacs.git

* lisp/info.el (Info-isearch-filter): Treat non-nil values of
`search-invisible' including its default value `open'
like the value `t' to match hidden text.

Fixes: debbugs:13402
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index cb3f0fcc978..5be2e29ff6d 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2013-02-14  Juri Linkov  <juri@jurta.org>
+
+	* info.el (Info-isearch-filter): Treat non-nil values of
+	`search-invisible' including its default value `open'
+	like the value `t' to match hidden text.  (Bug#13402)
+
 2013-02-14  Glenn Morris  <rgm@gnu.org>
 
 	* help-fns.el (find-lisp-object-file-name): Give special treatment
diff --git a/lisp/info.el b/lisp/info.el
index a6db9f3f4dc..24a7181ff52 100644
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -2151,7 +2151,7 @@ and is not in the header line or a tag table."
     (let ((backward (< found beg-found)))
       (not
        (or
-	(and (not (eq search-invisible t))
+	(and (not search-invisible)
 	     (if backward
 		 (or (text-property-not-all found beg-found 'invisible nil)
 		     (text-property-not-all found beg-found 'display nil))