From: Mattias Engdegård <mattiase@acm.org>
Date: Fri, 30 Dec 2022 10:30:23 +0000 (+0100)
Subject: ; fix misplaced bracketing of `and` inside `when`
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7493b4026fc74a51c76c5b614bc83b864af9bc31;p=emacs.git

; fix misplaced bracketing of `and` inside `when`
---

diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index e29f763dabc..3307771ef68 100644
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -2004,8 +2004,8 @@ variable with value KEYMAP."
                   (mapatoms (lambda (symb)
                               (when (and (boundp symb)
                                          (eq (symbol-value symb) keymap)
-                                         (not (eq symb 'keymap))
-                                         (throw 'found-keymap symb)))))
+                                         (not (eq symb 'keymap)))
+                                (throw 'found-keymap symb))))
                   nil)))
       ;; Follow aliasing.
       (or (ignore-errors (indirect-variable name)) name))))