From: Eshel Yaron <me@eshelyaron.com>
Date: Tue, 23 Jul 2024 19:22:03 +0000 (+0200)
Subject: crm.el: Fix addition of input to empty history list
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f7655387126d428ab2589c0d8aab83397d83b2b7;p=emacs.git

crm.el: Fix addition of input to empty history list
---

diff --git a/lisp/emacs-lisp/crm.el b/lisp/emacs-lisp/crm.el
index 251a92074a5..ca98d640a5e 100644
--- a/lisp/emacs-lisp/crm.el
+++ b/lisp/emacs-lisp/crm.el
@@ -455,8 +455,7 @@ with empty strings removed."
          (results (split-string string crm-current-separator t)))
     (when-let ((hist-var (and history-add-new-input
                               hist (not (eq hist t))
-                              (if (consp hist) (car hist) hist)))
-               (hist-list (symbol-value hist)))
+                              (if (consp hist) (car hist) hist))))
       (dolist (res results) (add-to-history hist-var res)))
     results))