diff options
| author | Eli Zaretskii | 2024-03-30 10:00:02 +0300 |
|---|---|---|
| committer | Eli Zaretskii | 2024-03-30 10:00:02 +0300 |
| commit | 946d4aad1dfb244352dfd0845a8bc3078fe9bca4 (patch) | |
| tree | 89f21a3232a507b3f8a063fdce7a1ebd67a7437f | |
| parent | fbf6830299998a1e99b99c69cb90b637a3d26f12 (diff) | |
| download | emacs-946d4aad1dfb244352dfd0845a8bc3078fe9bca4.tar.gz emacs-946d4aad1dfb244352dfd0845a8bc3078fe9bca4.zip | |
Avoid errors in Info-search-case-sensitively in DIR buffers
* lisp/info.el (Info-search): Don't run the "try other subfiles"
code if there are no subfiles. This happens, for example, in DIR
files. (Bug#70058)
| -rw-r--r-- | lisp/info.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/info.el b/lisp/info.el index 1c6df9a6ee5..5817737ca92 100644 --- a/lisp/info.el +++ b/lisp/info.el | |||
| @@ -2056,7 +2056,7 @@ If DIRECTION is `backward', search in the reverse direction." | |||
| 2056 | (re-search-forward regexp nil t)) | 2056 | (re-search-forward regexp nil t)) |
| 2057 | (signal 'user-search-failed (list regexp)))))) | 2057 | (signal 'user-search-failed (list regexp)))))) |
| 2058 | 2058 | ||
| 2059 | (if (and bound (not found)) | 2059 | (if (and (or bound (not Info-current-subfile)) (not found)) |
| 2060 | (signal 'user-search-failed (list regexp))) | 2060 | (signal 'user-search-failed (list regexp))) |
| 2061 | 2061 | ||
| 2062 | (unless (or found bound) | 2062 | (unless (or found bound) |