(find-lisp-insert-directory): Use mapc' rather than mapcar'.

This commit is contained in:
Juanma Barranquero 2007-09-25 11:06:14 +00:00
parent 458c46fc13
commit 1259dfc955

View file

@ -270,7 +270,7 @@ It is a function which takes two arguments, the directory and its parent."
;; No analog for find-lisp?
(insert find-lisp-line-indent "\n")
;; Run the find function
(mapcar
(mapc
(function
(lambda(file)
(find-lisp-find-dired-insert-file