(hl Info-history-list)
res)
(if (string-match "(\\([^)]+\\))\\([^)]*\\)" node)
- (setq file (Info-find-file (match-string 1 node))
+ (setq file (Info-find-file (match-string 1 node) t)
node (if (equal (match-string 2 node) "")
"Top"
(match-string 2 node))))
(hl Info-history-list)
res)
(if (string-match "(\\([^)]+\\))\\([^)]*\\)" node)
- (setq file (Info-find-file (match-string 1 node))
+ (setq file (Info-find-file (match-string 1 node) t)
node (if (equal (match-string 2 node) "")
"Top"
(match-string 2 node))))