diff options
| author | Johan Bockgård | 2016-10-22 00:14:44 +0200 |
|---|---|---|
| committer | Johan Bockgård | 2016-10-31 21:22:34 +0100 |
| commit | dec329aefc02302075f10feaecc3a0f4f1ccf076 (patch) | |
| tree | e22cd64c815ad2a94be4578be20d5d65d1f13605 | |
| parent | 8e7b1af1d708dcf41695cf3fbeff9d35cdb8e5b6 (diff) | |
| download | emacs-dec329aefc02302075f10feaecc3a0f4f1ccf076.tar.gz emacs-dec329aefc02302075f10feaecc3a0f4f1ccf076.zip | |
* lisp/emacs-lisp/cl-macs.el (cl-symbol-macrolet): Fix debug spec
(Bug#24733)
| -rw-r--r-- | lisp/emacs-lisp/cl-macs.el | 2 |
1 files changed, 1 insertions, 1 deletions
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 | |||
| 2134 | by EXPANSION, and (setq NAME ...) will act like (setf EXPANSION ...). | 2134 | by EXPANSION, and (setq NAME ...) will act like (setf EXPANSION ...). |
| 2135 | 2135 | ||
| 2136 | \(fn ((NAME EXPANSION) ...) FORM...)" | 2136 | \(fn ((NAME EXPANSION) ...) FORM...)" |
| 2137 | (declare (indent 1) (debug ((&rest (symbol sexp)) cl-declarations body))) | 2137 | (declare (indent 1) (debug ((&rest (symbolp sexp)) cl-declarations body))) |
| 2138 | (cond | 2138 | (cond |
| 2139 | ((cdr bindings) | 2139 | ((cdr bindings) |
| 2140 | `(cl-symbol-macrolet (,(car bindings)) | 2140 | `(cl-symbol-macrolet (,(car bindings)) |