diff --git a/lisp/info.el b/lisp/info.el index 9ee468f311d..4a90b3e65bb 100644 --- a/lisp/info.el +++ b/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 "\^_"))