Posted to tcl by patthoyts at Wed Oct 24 00:03:26 GMT 2007view pretty
Index: generic/tkWindow.c =================================================================== RCS file: /cvsroot/tktoolkit/tk/generic/tkWindow.c,v retrieving revision 1.86 diff -u -r1.86 tkWindow.c --- generic/tkWindow.c 17 Sep 2007 14:58:05 -0000 1.86 +++ generic/tkWindow.c 23 Oct 2007 23:57:20 -0000 @@ -1706,7 +1706,7 @@ } createProc = Tk_GetClassProc(winPtr->classProcsPtr, createProc); - if (createProc != NULL) { + if (createProc != NULL && parent != None) { winPtr->window = (*createProc)(tkwin, parent, winPtr->instanceData); } else { winPtr->window = TkpMakeWindow(winPtr, parent);