From: Johan Bockgård <bojohan@gnu.org>
Date: Fri, 21 Oct 2016 22:14:44 +0000 (+0200)
Subject: * lisp/emacs-lisp/cl-macs.el (cl-symbol-macrolet): Fix debug spec
X-Git-Tag: emacs-26.0.90~1399
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=dec329aefc02302075f10feaecc3a0f4f1ccf076;p=emacs.git

* lisp/emacs-lisp/cl-macs.el (cl-symbol-macrolet): Fix debug spec

(Bug#24733)
---

diff --git a/lisp/emacs-lisp/cl-macs.el b/lisp/emacs-lisp/cl-macs.el
index 0096e0aab3e..2ebb824e707 100644
--- a/lisp/emacs-lisp/cl-macs.el
+++ b/lisp/emacs-lisp/cl-macs.el
@@ -2134,7 +2134,7 @@ Within the body FORMs, references to the variable NAME will be replaced
 by EXPANSION, and (setq NAME ...) will act like (setf EXPANSION ...).
 
 \(fn ((NAME EXPANSION) ...) FORM...)"
-  (declare (indent 1) (debug ((&rest (symbol sexp)) cl-declarations body)))
+  (declare (indent 1) (debug ((&rest (symbolp sexp)) cl-declarations body)))
   (cond
    ((cdr bindings)
     `(cl-symbol-macrolet (,(car bindings))