diff options
author | Chong Yidong <cyd@gnu.org> | 2012-06-21 15:25:56 +0800 |
---|---|---|
committer | Chong Yidong <cyd@gnu.org> | 2012-06-21 15:25:56 +0800 |
commit | 6b67c0d4c9f275dcf2cc10efd356c98e8f61ae55 (patch) | |
tree | 5aac08ca4ddf17843e9107fde5954829fe0e9f92 /lisp | |
parent | e76f0800d2ceef239e8db3c2f81c6b71d4c70302 (diff) | |
download | emacs-6b67c0d4c9f275dcf2cc10efd356c98e8f61ae55.tar.gz |
* desktop.el (desktop-read): Use user-emacs-directory if desktop-path is nil.
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/ChangeLog | 1 | ||||
-rw-r--r-- | lisp/desktop.el | 4 |
2 files changed, 3 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 4d130250dcf..fb710374e18 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -2,6 +2,7 @@ * desktop.el (desktop-read): Don't prompt if daemon (Bug#11674). (desktop-path): Remove . from the default value (Bug#10977). + (desktop-read): Use user-emacs-directory if desktop-path is nil. 2012-06-20 Chong Yidong <cyd@gnu.org> diff --git a/lisp/desktop.el b/lisp/desktop.el index 2fd9d7f10ad..2c2106e18b7 100644 --- a/lisp/desktop.el +++ b/lisp/desktop.el @@ -966,8 +966,8 @@ It returns t if a desktop file was loaded, nil otherwise." (and dirs (car dirs))) ;; If not found and `desktop-path' is non-nil, use its first element. (and desktop-path (car desktop-path)) - ;; Default: Home directory. - "~")))) + ;; Default: .emacs.d. + user-emacs-directory)))) (if (file-exists-p (desktop-full-file-name)) ;; Desktop file found, but is it already in use? (let ((desktop-first-buffer nil) |