Mercurial > emacs

comparison lisp/desktop.el @ 16037:a1e88c05b53c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(desktop-basefilename): Use convert-standard-filename.
author Richard M. Stallman <rms@gnu.org>
date Sun, 01 Sep 1996 19:04:28 +0000
parents aabf776c3b6a
children 2c684820d196
comparison
equal deleted inserted replaced
16036:a9ced5af8a15 16037:a1e88c05b53c
103 (mapcar 'require '(info dired reporter))) 103 (mapcar 'require '(info dired reporter)))
104 ;; ---------------------------------------------------------------------------- 104 ;; ----------------------------------------------------------------------------
105 ;; USER OPTIONS -- settings you might want to play with. 105 ;; USER OPTIONS -- settings you might want to play with.
106 ;; ---------------------------------------------------------------------------- 106 ;; ----------------------------------------------------------------------------
107 (defconst desktop-basefilename 107 (defconst desktop-basefilename
108 (if (or (eq system-type 'ms-dos) (eq system-type 'windows-nt)) 108 (convert-standard-filename ".emacs.desktop")
109 "emacs.dsk" ; Ms-Dos does not support multiple dots in file name
110 ".emacs.desktop")
111 "File for Emacs desktop, not including the directory name.") 109 "File for Emacs desktop, not including the directory name.")
112 110
113 (defvar desktop-missing-file-warning t 111 (defvar desktop-missing-file-warning t
114 "*If non-nil then desktop warns when a file no longer exists. 112 "*If non-nil then desktop warns when a file no longer exists.
115 Otherwise it simply ignores that file.") 113 Otherwise it simply ignores that file.")