diff options
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/byte-opt.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/byte-opt.el b/lisp/emacs-lisp/byte-opt.el index 7aa34cff6bc..c02e8b02dea 100644 --- a/lisp/emacs-lisp/byte-opt.el +++ b/lisp/emacs-lisp/byte-opt.el @@ -1174,7 +1174,7 @@ (let ((var (car-safe (cdr-safe form)))) (cond ((and (eq (car-safe var) 'quote) (consp (cdr var))) - (list* 'setq (cadr var) (cddr form))) + `(setq ,(cadr var) ,@(cddr form))) ((and (eq (car-safe var) 'make-local-variable) (eq (car-safe (setq var (car-safe (cdr var)))) 'quote) (consp (cdr var))) |