changeset 84896:5b112f6186e3

(disassemble-1): Use `mapc' rather than `mapcar'.
author Juanma Barranquero <lekktu@gmail.com>
date Wed, 26 Sep 2007 00:11:46 +0000
parents 84fe291aadf6
children 992e87082552
files lisp/emacs-lisp/disass.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/disass.el	Wed Sep 26 00:11:21 2007 +0000
+++ b/lisp/emacs-lisp/disass.el	Wed Sep 26 00:11:46 2007 +0000
@@ -250,7 +250,7 @@
 			 (+ indent disassemble-recursive-indent)))
 		       ((eq (car-safe (car-safe arg)) 'byte-code)
 			(insert "(<byte code>...)\n")
-			(mapcar ;recurse on list of byte-code objects
+			(mapc ;recurse on list of byte-code objects
 			 '(lambda (obj)
 			    (disassemble-1
 			     obj