summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/frame.el3
2 files changed, 8 insertions, 0 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6ecc18cdcda..6f30ef90bad 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2013-07-29 Eli Zaretskii <eliz@gnu.org>
+
+ * frame.el (frame-notice-user-settings): Avoid inflooping when the
+ initial frame is minibuffer-less. (Bug#14841)
+
2013-07-29 Michael Albinus <michael.albinus@gmx.de>
* net/tramp.el (tramp-use-ssh-controlmaster-options): New customer
diff --git a/lisp/frame.el b/lisp/frame.el
index 71e7cc10de2..22cf484e54a 100644
--- a/lisp/frame.el
+++ b/lisp/frame.el
@@ -317,6 +317,9 @@ there (in decreasing order of priority)."
t))
;; Create the new frame.
(let (parms new)
+ ;; MS-Windows needs this to avoid inflooping below.
+ (if (eq system-type 'windows-nt)
+ (sit-for 0 t))
;; If the frame isn't visible yet, wait till it is.
;; If the user has to position the window,
;; Emacs doesn't know its real position until