From: Eli Zaretskii <eliz@gnu.org>
Date: Sat, 28 Dec 2013 17:12:57 +0000 (+0200)
Subject: Fix a thinko in last commit.
X-Git-Tag: emacs-24.3.90~173^2^2~42^2~45^2~387^2~141
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8962d4b30037c223af0026707fa35c9cf85c7e57;p=emacs.git

Fix a thinko in last commit.
---

diff --git a/src/w32fns.c b/src/w32fns.c
index 5ecddbc11d3..31c2aa58620 100644
--- a/src/w32fns.c
+++ b/src/w32fns.c
@@ -4346,7 +4346,8 @@ This function is an internal primitive--use `make-frame' instead.  */)
   Lisp_Object parent;
   struct kboard *kb;
 
-  if (!FRAME_W32_P (SELECTED_FRAME ()))
+  if (!FRAME_W32_P (SELECTED_FRAME ())
+      && !FRAME_INITIAL_P (SELECTED_FRAME ()))
     error ("Cannot create a GUI frame in a -nw session");
 
   /* Make copy of frame parameters because the original is in pure