move a pending_fullzoom=1 before a set_geom to avoid missing drawing
This commit is contained in:
parent
cd2aed9e08
commit
00ad8c9b3b
|
|
@ -3150,8 +3150,8 @@ int Tcl_AppInit(Tcl_Interp *inter)
|
|||
if(!file_loaded) tcleval("exit 1");
|
||||
if(cli_opt_do_netlist) set_modify(-1); /* set tab/window title */
|
||||
}
|
||||
if(has_x) tclvareval("set_geom . [xschem get schname]", NULL);
|
||||
xctx->pending_fullzoom=1;
|
||||
if(has_x) tclvareval("set_geom . [xschem get schname]", NULL);
|
||||
|
||||
if(cli_opt_do_netlist) {
|
||||
if(!cli_opt_filename[0]) {
|
||||
|
|
|
|||
|
|
@ -8527,10 +8527,11 @@ proc store_geom {win filename} {
|
|||
foreach i [array names geom_array] {
|
||||
append geom_data $i { } $geom_array($i) \n
|
||||
}
|
||||
puts $geom_data
|
||||
puts ---
|
||||
# puts $geom_data
|
||||
# puts ---
|
||||
# set geom_data [lsort -stride 3 -index 2 -integer $geom_data]
|
||||
puts $geom_data
|
||||
# puts $geom_data
|
||||
# puts ===
|
||||
write_data $geom_data $geom_file
|
||||
}
|
||||
}
|
||||
|
|
|
|||
Loading…
Reference in New Issue