merged in TheSUperChayan feature for displaying `Draw Wire` in status bar when in wiring mode.

This commit is contained in:
stefan schippers 2025-02-12 16:25:46 +01:00
parent bc293a1d8f
commit 95cbd80767
2 changed files with 9 additions and 1 deletions

View File

@ -4503,6 +4503,12 @@ int wire_draw_active = (xctx->ui_state & STARTWIRE) ||
}
#endif
if(wire_draw_active) {
tclvareval(xctx->top_path, ".statusbar.10 configure -state active -text {DRAW WIRE! }", NULL);
} else {
tclvareval(xctx->top_path, ".statusbar.10 configure -state normal -text { }", NULL);
}
tclvareval(xctx->top_path, ".statusbar.7 configure -text $netlist_type", NULL);
tclvareval(xctx->top_path, ".statusbar.3 delete 0 end;",
xctx->top_path, ".statusbar.3 insert 0 $cadsnap",

View File

@ -8057,6 +8057,7 @@ proc pack_widgets { { topwin {} } } {
pack $topwin.statusbar.6 -side left
pack $topwin.statusbar.7 -side left
pack $topwin.statusbar.10 -side left
pack $topwin.statusbar.11 -side left
pack $topwin.statusbar.9 -side left
pack $topwin.statusbar.8 -side left
pack $topwin.statusbar.1 -side left -fill x
@ -8797,7 +8798,8 @@ tclcommand=\"xschem raw_read \$netlist_dir/[file tail [file rootname [xschem get
entry_replace_selection $topwin.statusbar.5
label $topwin.statusbar.6 -text "MODE:"
label $topwin.statusbar.7 -width 7
label $topwin.statusbar.10 -text {Stretch:}
label $topwin.statusbar.11 -text {Stretch:}
label $topwin.statusbar.10 -activebackground green -text {}
label $topwin.statusbar.9 -textvariable enable_stretch
label $topwin.statusbar.8 -activebackground red -text {}
add_toolbuttons $topwin