[Emacs-diffs] emacs/lisp info.el

[Juri Linkov]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Juri Linkov <jurta>     09/01/14 23:09:46

Modified files:
        lisp           : info.el 

Log message:
        (Info-isearch-filter): Don't filter out invisible text
        when search-invisible is t.  (Bug#1848)

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/info.el?cvsroot=emacs&r1=1.557&r2=1.558

Patches:
Index: info.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/info.el,v
retrieving revision 1.557
retrieving revision 1.558
diff -u -b -r1.557 -r1.558
--- info.el     10 Jan 2009 10:42:08 -0000      1.557
+++ info.el     14 Jan 2009 23:09:45 -0000      1.558
@@ -1868,11 +1868,12 @@
     (let ((backward (< found beg-found)))
       (not
        (or
+       (and (not (eq search-invisible t))
        (if backward
            (or (text-property-not-all found beg-found 'invisible nil)
                (text-property-not-all found beg-found 'display nil))
          (or (text-property-not-all beg-found found 'invisible nil)
-             (text-property-not-all beg-found found 'display nil)))
+                  (text-property-not-all beg-found found 'display nil))))
        ;; Skip node header line
        (and (save-excursion (forward-line -1)
                             (looking-at "\^_"))