master 1aaeed9: Signal an error in `search-forward-help-for-help'

[Lars Ingebrigtsen]

branch: master
commit 1aaeed903a1a9bdb60c745180e13a2e0a313a9bc
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Signal an error in `search-forward-help-for-help'
    
    * lisp/help.el (search-forward-help-for-help): Error out instead
    of showing an empty buffer (bug#50881).
---
 lisp/help.el | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/lisp/help.el b/lisp/help.el
index b794751..02e9b9e 100644
--- a/lisp/help.el
+++ b/lisp/help.el
@@ -952,8 +952,11 @@ current buffer."
            (describe-function-1 defn)))))))
 
 (defun search-forward-help-for-help ()
-  "Search forward \"help window\"."
+  "Search forward in the help-for-help window.
+This command is meant to be used after issuing the `C-h C-h' command."
   (interactive)
+  (unless (get-buffer help-for-help-buffer-name)
+    (error "No %s buffer; use `C-h C-h' first" help-for-help-buffer-name))
   ;; Move cursor to the "help window".
   (pop-to-buffer help-for-help-buffer-name)
   ;; Do incremental search forward.