(Info-isearch-filter): Don't filter out invisible text
when search-invisible is t. (Bug#1848)
This commit is contained in:
parent
033535ded7
commit
744059aeec
1 changed files with 6 additions and 5 deletions
11
lisp/info.el
11
lisp/info.el
|
@ -1868,11 +1868,12 @@ and is not in the header line or a tag table."
|
|||
(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 "\^_"))
|
||||
|
|
Loading…
Add table
Reference in a new issue