remove unguarded and unnecessary (no check if X11 is present) call to focus in proc tclpropeval2
This commit is contained in:
parent
b69f793f83
commit
265ebaa89d
|
|
@ -6987,7 +6987,6 @@ proc tclpropeval2 {s} {
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
if { $xschem_execute_scripts eq {yes} } {
|
if { $xschem_execute_scripts eq {yes} } {
|
||||||
focus [xschem get top_path].drw
|
|
||||||
if { [catch {uplevel #0 "subst \{$s\}"} res] } {
|
if { [catch {uplevel #0 "subst \{$s\}"} res] } {
|
||||||
if { $debug_tcleval > 0} { puts "tclpropeval2 warning: $s --> $res"}
|
if { $debug_tcleval > 0} { puts "tclpropeval2 warning: $s --> $res"}
|
||||||
set res ?\n
|
set res ?\n
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue