(tempo-dolist): Don't use `cadr'.

7f4d3657 · Karl Heuer · 90bebcb0 · 7f4d3657
Commit 7f4d3657 authored Apr 05, 1995 by Karl Heuer
Hide whitespace changes
Inline Side-by-side

Showing with 3 additions and 3 deletions

lisp/tempo.el lisp/tempo.el +3 -3

No files found.
--- a/lisp/tempo.el
+++ b/lisp/tempo.el
@@ -5,7 +5,7 @@
 ;; Created: 16 Feb 1994
 ;; Version: 1.2.1
 ;; Keywords: extensions, languages, tools
-;; $Revision: 1.29 $
+;; $Revision: 1.5 $

 ;; This file is part of GNU Emacs.

@@ -211,9 +211,9 @@ it recognizes the argument, and NIL otherwise")
 	(l (car (cdr il))))
    (list 'tempo-mapc
 	  (list 'function (append (list 'lambda
-					(list (car il)))
+					(list i))
 				  forms))
-	  (cadr il))))
+	  l)))
 (put 'tempo-dolist 'lisp-indent-function 1)

 ;;