From: Richard M. Stallman Date: Sat, 13 Sep 1997 18:49:49 +0000 (+0000) Subject: (cl-loop-let): Use `last', not `last*' X-Git-Tag: emacs-20.1~29 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f4cf76d31fd3d20fd0bf48abce574c8ccd54fd09;p=emacs.git (cl-loop-let): Use `last', not `last*' --- diff --git a/lisp/emacs-lisp/cl-macs.el b/lisp/emacs-lisp/cl-macs.el index a9c60886d17..37d02b564cb 100644 --- a/lisp/emacs-lisp/cl-macs.el +++ b/lisp/emacs-lisp/cl-macs.el @@ -1058,7 +1058,7 @@ Valid clauses are: (let* ((spec (caar specs)) (nspecs nil) (expr (cadr (cl-pop specs))) (temp (cdr (or (assq spec loop-destr-temps) - (car (cl-push (cons spec (or (last* spec 0) + (car (cl-push (cons spec (or (last spec 0) (gensym))) loop-destr-temps)))))) (cl-push (list temp expr) new)