11 lines
373 B
C
11 lines
373 B
C
--- tclxcircuit.c.orig 2017-04-25 12:36:04 UTC
|
|
+++ tclxcircuit.c
|
|
@@ -8947,7 +8947,7 @@ int defaultscript()
|
|
sprintf(_STR2, "%s/tcl/%s", SCRIPTS_DIR, STARTUP_FILE);
|
|
if ((fd = fopen(_STR2, "r")) == NULL) {
|
|
Wprintf("Failed to open startup script \"%s\"\n", STARTUP_FILE);
|
|
- return;
|
|
+ return TCL_ERROR;
|
|
}
|
|
}
|
|
}
|