# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1190717104 0
# Node ID a853167e2059ef7845a5ab40aaaf61b76c54fc3d
# Parent  4795469428b360e3fd2b1c160b4c1732c1128079
(dired-restore-desktop-buffer): Use `mapc' rather than `mapcar'.

diff -r 4795469428b3 -r a853167e2059 lisp/dired.el
--- a/lisp/dired.el	Tue Sep 25 10:44:23 2007 +0000
+++ b/lisp/dired.el	Tue Sep 25 10:45:04 2007 +0000
@@ -3336,7 +3336,7 @@
           (dired dired-dir)
           ;; The following elements of `desktop-buffer-misc' are the keys
           ;; from `dired-subdir-alist'.
-          (mapcar 'dired-maybe-insert-subdir (cdr desktop-buffer-misc))
+          (mapc 'dired-maybe-insert-subdir (cdr desktop-buffer-misc))
           (current-buffer))
       (message "Desktop: Directory %s no longer exists." dir)
       (when desktop-missing-file-warning (sit-for 1))