From: Stefan Kangas <stefankangas@gmail.com>
Date: Tue, 8 Aug 2023 01:37:54 +0000 (+0200)
Subject: Delete useless conditional in describe-keymap
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=bbd69f1663abe0066319efbeb06e9dc9f6ec8d92;p=emacs.git

Delete useless conditional in describe-keymap

* lisp/help-fns.el (describe-keymap): Delete useless
conditional.  (Bug#65128)
---

diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index 2d94182df33..fc8f431fd11 100644
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -2071,11 +2071,9 @@ keymap value."
         (if (symbolp keymap)
             (error "Not a keymap variable: %S" keymap)
           (error "Not a keymap")))
-      (let ((sym nil))
-        (unless sym
-          (setq sym (cl-gentemp "KEYMAP OBJECT (no variable) "))
-          (setq used-gentemp t)
-          (set sym keymap))
+      (let ((sym (cl-gentemp "KEYMAP OBJECT (no variable) ")))
+        (setq used-gentemp t)
+        (set sym keymap)
         (setq keymap sym)))
     ;; Follow aliasing.
     (setq keymap (or (ignore-errors (indirect-variable keymap)) keymap))