do not execute tcl proc "build_windows" in xinit.c if no X or -x option given

This commit is contained in:
Stefan Schippers
2020-10-27 12:00:34 +01:00
parent d5ff835614
commit 5706b12ad9
+1 -1
View File
@@ -1409,7 +1409,7 @@ int Tcl_AppInit(Tcl_Interp *inter)
/* Completing tk windows creation (see xschem.tcl, build_windows) and event binding */ /* Completing tk windows creation (see xschem.tcl, build_windows) and event binding */
/* *AFTER* X initialization done */ /* *AFTER* X initialization done */
/* */ /* */
tcleval("build_windows"); if(has_x) tcleval("build_windows");
fullscreen=atoi(tclgetvar("fullscreen")); fullscreen=atoi(tclgetvar("fullscreen"));
if(fullscreen) { if(fullscreen) {