diff options
author | Juanma Barranquero <lekktu@gmail.com> | 2013-07-26 16:01:19 +0200 |
---|---|---|
committer | Juanma Barranquero <lekktu@gmail.com> | 2013-07-26 16:01:19 +0200 |
commit | 045f7a53f9cd934488d5ac75d023c57eee059e85 (patch) | |
tree | c8dc42f446b9f6ac1f4d1d2939295f7b8b29d44b /lisp/desktop.el | |
parent | a8f93651727e5497cb8c0b992da0030f698afff4 (diff) | |
download | emacs-045f7a53f9cd934488d5ac75d023c57eee059e85.tar.gz emacs-045f7a53f9cd934488d5ac75d023c57eee059e85.tar.bz2 emacs-045f7a53f9cd934488d5ac75d023c57eee059e85.zip |
lisp/desktop.el (desktop-restore-frames): Call `sit-for'.
We want to be sure that new frames are visible before deleting
any remaining ones.
Diffstat (limited to 'lisp/desktop.el')
-rw-r--r-- | lisp/desktop.el | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lisp/desktop.el b/lisp/desktop.el index 28c781d95e2..a29a30971aa 100644 --- a/lisp/desktop.el +++ b/lisp/desktop.el @@ -1404,6 +1404,10 @@ being set (usually, by reading it from the desktop)." (error (delay-warning 'desktop (error-message-string err) :error)))) + ;; In case we try to delete the initial frame, we want to make sure that + ;; other frames are already visible (discussed in thread for bug#14841). + (sit-for 0 t) + ;; Delete remaining frames, but do not fail if some resist being deleted. (unless (eq desktop-restoring-reuses-frames 'keep) (dolist (frame desktop--reuse-list) |