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

fix setting netlist button color code statwe variable (tctx::...._netlist)

This commit is contained in:
stefan schippers 2023-11-06 01:44:25 +01:00
parent 881d8a4ed9
commit e5431d86c5
3 changed files with 8 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/actions.c
View File

@ -151,8 +151,8 @@ int set_modify(int mod)
if(mod == 1 || (mod == 0 && xctx->prev_set_modify) || mod == -2) {
tclvareval(xctx->top_path, ".menubar.netlist configure -bg $simulate_bg", NULL);
tclvareval(xctx->top_path, ".menubar.simulate configure -bg $simulate_bg", NULL);
tclvareval(xctx->top_path, "set tctx::", xctx->current_win_path, "_netlist $simulate_bg", NULL);
tclvareval(xctx->top_path, "set tctx::", xctx->current_win_path, "_simulate $simulate_bg", NULL);
tclvareval("set tctx::", xctx->current_win_path, "_netlist $simulate_bg", NULL);
tclvareval("set tctx::", xctx->current_win_path, "_simulate $simulate_bg", NULL);
}
/* clear floater caches */

8
src/callback.c
View File

@ -2388,11 +2388,11 @@ int rstate; /* (reduced state, without ShiftMask) */
}
if(err) {
tclvareval(xctx->top_path, ".menubar.netlist configure -bg red", NULL);
tclvareval(xctx->top_path, "set tctx::", xctx->current_win_path, "_netlist red", NULL);
tclvareval("set tctx::", xctx->current_win_path, "_netlist red", NULL);
} else {
tclvareval(xctx->top_path, ".menubar.netlist configure -bg LightGreen", NULL);
tclvareval(xctx->top_path, "set tctx::", xctx->current_win_path, "_netlist LightGreen", NULL);
tclvareval("set tctx::", xctx->current_win_path, "_netlist LightGreen", NULL);
}
break;
}
@ -2419,10 +2419,10 @@ int rstate; /* (reduced state, without ShiftMask) */
}
if(err) {
tclvareval(xctx->top_path, ".menubar.netlist configure -bg red", NULL);
tclvareval(xctx->top_path, "set tctx::", xctx->current_win_path, "_netlist red", NULL);
tclvareval("set tctx::", xctx->current_win_path, "_netlist red", NULL);
} else {
tclvareval(xctx->top_path, ".menubar.netlist configure -bg LightGreen", NULL);
tclvareval(xctx->top_path, "set tctx::", xctx->current_win_path, "_netlist LightGreen", NULL);
tclvareval("set tctx::", xctx->current_win_path, "_netlist LightGreen", NULL);
}
break;

4
src/scheduler.c
View File

@ -2710,10 +2710,10 @@ int xschem(ClientData clientdata, Tcl_Interp *interp, int argc, const char * arg
}
if(err) {
tclvareval(xctx->top_path, ".menubar.netlist configure -bg red", NULL);
tclvareval(xctx->top_path, "set tctx::", xctx->current_win_path, "_netlist red", NULL);
tclvareval("set tctx::", xctx->current_win_path, "_netlist red", NULL);
} else {
tclvareval(xctx->top_path, ".menubar.netlist configure -bg LightGreen", NULL);
tclvareval(xctx->top_path, "set tctx::", xctx->current_win_path, "_netlist LightGreen", NULL);
tclvareval("set tctx::", xctx->current_win_path, "_netlist LightGreen", NULL);
}
tclsetvar("show_infowindow_after_netlist", saveshow);
my_free(_ALLOC_ID_, &saveshow);