From: Gerd Möllmann <gerd@gnu.org>
Date: Tue, 18 Oct 2022 06:31:19 +0000 (+0200)
Subject: Revert "Dpn't assume symbol-name of keywords starts with colon"
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=77543a203a54d19af62bc4ca21d472945ad6c543;p=emacs.git

Revert "Dpn't assume symbol-name of keywords starts with colon"

This reverts commit bb6b5db2b7af3f1aaf8866d4dd6ce944d10244f8.
---

diff --git a/lisp/emacs-lisp/cl-seq.el b/lisp/emacs-lisp/cl-seq.el
index 7cff3f3ce10..60e204eaf51 100644
--- a/lisp/emacs-lisp/cl-seq.el
+++ b/lisp/emacs-lisp/cl-seq.el
@@ -58,7 +58,7 @@
                (if (eq var :if-not)
                    (setq mem `(and ,mem (setq cl-if ,mem) t)))
                (list (intern
-                      (format "cl-%s" (substring (symbol-name var) 0)))
+                      (format "cl-%s" (substring (symbol-name var) 1)))
                      (if (consp x) `(or ,mem ,(car (cdr x))) mem))))
            kwords)
      ,@(append