Browse files

Use mapc instead of mapcar.

  • Loading branch information...
1 parent 9ac9506 commit 4488ac74f2e0074b7b60a369c77f949e536f15d5 @skeeto committed Aug 17, 2012
Showing with 1 addition and 1 deletion.
  1. +1 −1 fakespace.el
@@ -68,7 +68,7 @@ items that are in B and not A."
(dolist (arg args)
(let ((type (car arg)))
(cond ((eq type :exports) t) ; interning the symbols is enough
- ((eq type :use) (mapcar (lambda (s) (require s)) (cdr arg))))))
+ ((eq type :use) (mapc (lambda (s) (require s)) (cdr arg))))))
(setq old-obarray (fakespace--atom-list))
`(provide (quote ,name)))

0 comments on commit 4488ac7

Please sign in to comment.