From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Sun, 4 Sep 2022 09:37:32 +0000 (+0200)
Subject: Fix some help-fns test failures
X-Git-Tag: emacs-29.0.90~1856^2~742
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=500af031c88b7ddb3252f4d28113cf1d3e8144c7;p=emacs.git

Fix some help-fns test failures

* lisp/help-fns.el (help-fns--key-bindings): Fix test failures
from recent change.
---

diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index 3f3a5747dc2..6d635ec9ee3 100644
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -516,7 +516,7 @@ the C sources, too."
           (remapped (command-remapping function)))
       (unless (memq remapped '(ignore undefined))
         (let* ((all-keys
-                (with-current-buffer orig-buffer
+                (with-current-buffer (or orig-buffer (current-buffer))
                   (where-is-internal
                    (or remapped function) overriding-local-map nil nil)))
                (seps (seq-group-by