remove unguarded and unnecessary (no check if X11 is present) call to focus in proc tclpropeval2

2026-07-27 14:39:42 +02:00 · 2026-07-27 14:39:42 +02:00 · 265ebaa89d
parent b69f793f83
commit 265ebaa89d
1 changed files with 0 additions and 1 deletions
--- a/src/xschem.tcl
+++ b/src/xschem.tcl
@ -6987,7 +6987,6 @@ proc tclpropeval2 {s} {
    }
  }
  if { $xschem_execute_scripts eq {yes} } {  
-    focus [xschem get top_path].drw
    if { [catch {uplevel #0 "subst \{$s\}"} res] } {
      if { $debug_tcleval > 0} { puts "tclpropeval2 warning: $s --> $res"}
      set res ?\n