emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master bbd69f1663a: Delete useless conditional in describe-keymap


From: Stefan Kangas
Subject: master bbd69f1663a: Delete useless conditional in describe-keymap
Date: Mon, 7 Aug 2023 21:41:24 -0400 (EDT)

branch: master
commit bbd69f1663abe0066319efbeb06e9dc9f6ec8d92
Author: Stefan Kangas <stefankangas@gmail.com>
Commit: Stefan Kangas <stefankangas@gmail.com>

    Delete useless conditional in describe-keymap
    
    * lisp/help-fns.el (describe-keymap): Delete useless
    conditional.  (Bug#65128)
---
 lisp/help-fns.el | 8 +++-----
 1 file changed, 3 insertions(+), 5 deletions(-)

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))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]