# HG changeset patch
# User Chong Yidong <cyd@stupidchicken.com>
# Date 1175884523 0
# Node ID 69597b6214971ee6164e8fb2d3b33817294d3317
# Parent  988e52fbb50874025b10eaa7af2ee013c322f4fa
(desktop-create-buffer, desktop-save): Revert 2004-11-12 change.

diff -r 988e52fbb508 -r 69597b621497 lisp/desktop.el
--- a/lisp/desktop.el	Fri Apr 06 18:35:09 2007 +0000
+++ b/lisp/desktop.el	Fri Apr 06 18:35:23 2007 +0000
@@ -782,7 +782,7 @@
          ";; Desktop file format version " desktop-file-version "\n"
          ";; Emacs version " emacs-version "\n\n"
          ";; Global section:\n")
-        (mapc (function desktop-outvar) desktop-globals-to-save)
+        (mapcar (function desktop-outvar) desktop-globals-to-save)
         (if (memq 'kill-ring desktop-globals-to-save)
             (insert
              "(setq kill-ring-yank-pointer (nthcdr "
@@ -790,7 +790,7 @@
              " kill-ring))\n"))
 
         (insert "\n;; Buffer section -- buffers listed in same order as in buffer list:\n")
-        (mapc #'(lambda (l)
+        (mapcar #'(lambda (l)
                   (when (apply 'desktop-save-buffer-p l)
                     (insert "("
                             (if (or (not (integerp eager))
@@ -801,7 +801,7 @@
                               "desktop-append-buffer-args")
                             " "
                             desktop-file-version)
-                    (mapc #'(lambda (e)
+                    (mapcar #'(lambda (e)
                               (insert "\n  " (desktop-value-to-string e)))
                           l)
                     (insert ")\n\n")))
@@ -1045,7 +1045,7 @@
               ((equal '(nil) desktop-buffer-minor-modes) ; backwards compatible
                (auto-fill-mode 0))
               (t
-               (mapc #'(lambda (minor-mode)
+               (mapcar #'(lambda (minor-mode)
                          ;; Give minor mode module a chance to add a handler.
                          (desktop-load-file minor-mode)
                          (let ((handler (cdr (assq minor-mode desktop-minor-mode-handlers))))