luke
/
xschem
mirror of https://github.com/StefanSchippers/xschem.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

xinit.c: source tcl_files before calling load_schematic(), so "load_file_postprocess" (that is triggered by load_schematic() will work (supplied scripts are already loaded) when starting xschem

This commit is contained in:
stefan schippers 2025-08-09 10:41:03 +02:00
parent 6bf4fd4da6
commit 24ff9ab8f0
1 changed files with 9 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
src/xinit.c
View File

@ -3038,6 +3038,12 @@ int Tcl_AppInit(Tcl_Interp *inter)
my_strncpy(xctx->sch_to_compare, abs_sym_path(cli_opt_diff, ""), S(xctx->sch_to_compare)); my_strncpy(xctx->sch_to_compare, abs_sym_path(cli_opt_diff, ""), S(xctx->sch_to_compare));
tclsetvar("compare_sch", "1"); tclsetvar("compare_sch", "1");
} }
/* */
/* SOURCE XSCHEMRC SUPPLIED TCL FILES */
/* */
tcleval("update; source_user_tcl_files");
if(cli_opt_filename[0]) { if(cli_opt_filename[0]) {
char f[PATH_MAX]; char f[PATH_MAX];
int file_loaded = 1; int file_loaded = 1;
@ -3162,9 +3168,10 @@ int Tcl_AppInit(Tcl_Interp *inter)
} }
/* */ /* */
/* SOURCE XSCHEMRC SUPPLIED TCL FILES */ /* SOURCE SUPPLIED TCL FILES */
/* to be executed on any new window */
/* creation */
/* */ /* */
tcleval("update; source_user_tcl_files");
tcleval("eval_user_startup_commands"); tcleval("eval_user_startup_commands");
/* source tcl file given on command line with --script */ /* source tcl file given on command line with --script */