diff options
| -rw-r--r-- | lisp/info.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/info.el b/lisp/info.el index 90964a61a2f..a00afce7d0a 100644 --- a/lisp/info.el +++ b/lisp/info.el | |||
| @@ -3804,7 +3804,7 @@ the variable `Info-file-list-for-emacs'." | |||
| 3804 | (hl Info-history-list) | 3804 | (hl Info-history-list) |
| 3805 | res) | 3805 | res) |
| 3806 | (if (string-match "(\\([^)]+\\))\\([^)]*\\)" node) | 3806 | (if (string-match "(\\([^)]+\\))\\([^)]*\\)" node) |
| 3807 | (setq file (Info-find-file (match-string 1 node)) | 3807 | (setq file (Info-find-file (match-string 1 node) t) |
| 3808 | node (if (equal (match-string 2 node) "") | 3808 | node (if (equal (match-string 2 node) "") |
| 3809 | "Top" | 3809 | "Top" |
| 3810 | (match-string 2 node)))) | 3810 | (match-string 2 node)))) |
| @@ -3909,7 +3909,7 @@ the variable `Info-file-list-for-emacs'." | |||
| 3909 | (hl Info-history-list) | 3909 | (hl Info-history-list) |
| 3910 | res) | 3910 | res) |
| 3911 | (if (string-match "(\\([^)]+\\))\\([^)]*\\)" node) | 3911 | (if (string-match "(\\([^)]+\\))\\([^)]*\\)" node) |
| 3912 | (setq file (Info-find-file (match-string 1 node)) | 3912 | (setq file (Info-find-file (match-string 1 node) t) |
| 3913 | node (if (equal (match-string 2 node) "") | 3913 | node (if (equal (match-string 2 node) "") |
| 3914 | "Top" | 3914 | "Top" |
| 3915 | (match-string 2 node)))) | 3915 | (match-string 2 node)))) |