diff options
| author | Glenn Morris <rgm@gnu.org> | 2014-07-15 21:28:42 -0700 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2014-07-15 21:28:42 -0700 |
| commit | 61dcf9bc85b309e1fa052eb1e76698d4789f7f72 (patch) | |
| tree | 3938d0760e1495dc529f0de99ee1ea8c2919c4cf | |
| parent | 50426c32c91ff139de22f09bd378e859a7905c2b (diff) | |
| download | emacs-61dcf9bc85b309e1fa052eb1e76698d4789f7f72.tar.gz | |
* lisp/desktop.el (after-init-hook): Disable startup frame restoration
in non-graphical situations.
Fixes: debbugs:17693
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/desktop.el | 11 |
2 files changed, 14 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 14ed03e7570..0e82c4bbc46 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2014-07-16 Glenn Morris <rgm@gnu.org> + + * desktop.el (after-init-hook): Disable startup frame restoration + in non-graphical situations. (Bug#17693) + 2014-07-14 Glenn Morris <rgm@gnu.org> * vc/vc-dispatcher.el (vc-log-edit): Do set up the log buffer diff --git a/lisp/desktop.el b/lisp/desktop.el index 12207f3cdac..40e6b364e45 100644 --- a/lisp/desktop.el +++ b/lisp/desktop.el @@ -1516,8 +1516,15 @@ If there are no buffers left to create, kill the timer." (setq command-line-args (delete key command-line-args)) (desktop-save-mode 0))) (when desktop-save-mode - (desktop-read) - (setq inhibit-startup-screen t)))) + ;; People don't expect emacs -nw, or --daemon, + ;; to create graphical frames (bug#17693). + ;; TODO perhaps there should be a separate value + ;; for desktop-restore-frames to control this startup behavior? + (let ((desktop-restore-frames (and desktop-restore-frames + initial-window-system + (not (daemonp))))) + (desktop-read) + (setq inhibit-startup-screen t))))) ;; So we can restore vc-dir buffers. (autoload 'vc-dir-mode "vc-dir" nil t) |