do not execute tcl proc "build_windows" in xinit.c if no X or -x option given
This commit is contained in:
parent
d5ff835614
commit
5706b12ad9
|
|
@ -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) {
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue