Commit 7f4d3657 authored by Karl Heuer's avatar Karl Heuer
Browse files

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

parent 90bebcb0
...@@ -5,7 +5,7 @@ ...@@ -5,7 +5,7 @@
;; Created: 16 Feb 1994 ;; Created: 16 Feb 1994
;; Version: 1.2.1 ;; Version: 1.2.1
;; Keywords: extensions, languages, tools ;; Keywords: extensions, languages, tools
;; $Revision: 1.29 $ ;; $Revision: 1.5 $
;; This file is part of GNU Emacs. ;; This file is part of GNU Emacs.
...@@ -211,9 +211,9 @@ it recognizes the argument, and NIL otherwise") ...@@ -211,9 +211,9 @@ it recognizes the argument, and NIL otherwise")
(l (car (cdr il)))) (l (car (cdr il))))
(list 'tempo-mapc (list 'tempo-mapc
(list 'function (append (list 'lambda (list 'function (append (list 'lambda
(list (car il))) (list i))
forms)) forms))
(cadr il)))) l)))
(put 'tempo-dolist 'lisp-indent-function 1) (put 'tempo-dolist 'lisp-indent-function 1)
;; ;;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment