From b5de718d632f3b52d8b42a519eb0db0dc9dbff7e Mon Sep 17 00:00:00 2001
From: stefan schippers <stefan.schippers@gmail.com>
Date: Tue, 23 Sep 2025 01:39:59 +0200
Subject: [PATCH] fix an issue with compare schematics (set tcl compare_sch
 variable after calling xschem compare_schematics)

---
 src/xschem.tcl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/xschem.tcl b/src/xschem.tcl
index ecd05872..0eeb5520 100644
--- a/src/xschem.tcl
+++ b/src/xschem.tcl
@@ -9527,7 +9527,7 @@ proc build_widgets { {topwin {} } } {
 
   $topwin.menubar.hilight add command \
    -label {Set schematic to compare and compare with} \
-   -command "set compare_sch 1; xschem compare_schematics" 
+   -command "xschem compare_schematics; set compare_sch 1" 
   $topwin.menubar.hilight add command \
    -label {Swap compare schematics} \
    -command "swap_compare_schematics"