Mercurial > emacs
comparison lisp/desktop.el @ 16037:a1e88c05b53c
(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.") |