Mercurial > emacs
diff lisp/info.el @ 101180:2b60f03f682b
(Info-isearch-filter): Don't filter out invisible text
when search-invisible is t. (Bug#1848)
| author | Juri Linkov <juri@jurta.org> |
|---|---|
| date | Wed, 14 Jan 2009 23:09:45 +0000 |
| parents | edc1b75fdb15 |
| children | 6bef200e9243 |
line wrap: on
line diff
--- a/lisp/info.el Wed Jan 14 20:47:02 2009 +0000 +++ b/lisp/info.el Wed Jan 14 23:09:45 2009 +0000 @@ -1868,11 +1868,12 @@ (let ((backward (< found beg-found))) (not (or - (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))) + (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)))) ;; Skip node header line (and (save-excursion (forward-line -1) (looking-at "\^_"))