Show
Ignore:
Timestamp:
2007年04月07日 15時49分28秒 (2 years ago)
Author:
miyoshi
Message:

Sync up with Emacs CVS HEAD.

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • trunk/lisp/desktop.el

    r4196 r4200  
    783783         ";; Emacs version " emacs-version "\n\n" 
    784784         ";; Global section:\n") 
    785         (mapc (function desktop-outvar) desktop-globals-to-save) 
     785        (mapcar (function desktop-outvar) desktop-globals-to-save) 
    786786        (if (memq 'kill-ring desktop-globals-to-save) 
    787787            (insert 
     
    791791 
    792792        (insert "\n;; Buffer section -- buffers listed in same order as in buffer list:\n") 
    793         (mapc #'(lambda (l) 
     793        (mapcar #'(lambda (l) 
    794794                  (when (apply 'desktop-save-buffer-p l) 
    795795                    (insert "(" 
     
    802802                            " " 
    803803                            desktop-file-version) 
    804                     (mapc #'(lambda (e) 
     804                    (mapcar #'(lambda (e) 
    805805                              (insert "\n  " (desktop-value-to-string e))) 
    806806                          l) 
     
    10461046               (auto-fill-mode 0)) 
    10471047              (t 
    1048                (mapc #'(lambda (minor-mode) 
     1048               (mapcar #'(lambda (minor-mode) 
    10491049                         ;; Give minor mode module a chance to add a handler. 
    10501050                         (desktop-load-file minor-mode)