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

postinit_commands: execute at global scope

This commit is contained in:
stefan schippers 2024-03-08 16:05:43 +01:00
parent 0611c7a6e7
commit d85ea9461c
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/xschem.tcl
View File

@ -289,7 +289,7 @@ proc execute_fileevent {id} {
# puts $execute(callback,$id)
# puts $execute(win_path,$id)
eval uplevel #0 [list $execute(callback,$id)]
}
}
if { [info exists tctx::$execute(win_path,$id)_simulate_id] } {
if { [set tctx::$execute(win_path,$id)_simulate_id] eq $id } {
unset tctx::$execute(win_path,$id)_simulate_id
@ -8112,7 +8112,7 @@ proc source_user_tcl_files {} {
proc eval_postinit_commands {} {
global postinit_commands
if {[info exists postinit_commands]} {
catch {eval $postinit_commands}
catch {uplevel #0 $postinit_commands}
}
}