From 5ee7af7b02f6a7187a311bd7e5f5cc6e8b4c7450 Mon Sep 17 00:00:00 2001
From: stefan schippers <stefan.schippers@gmail.com>
Date: Fri, 26 Sep 2025 11:20:44 +0200
Subject: [PATCH] set focus inside topwin.drw in proc set_bindings

---
 src/xschem.tcl | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/src/xschem.tcl b/src/xschem.tcl
index 6a3eac59..b0c0c506 100644
--- a/src/xschem.tcl
+++ b/src/xschem.tcl
@@ -9012,7 +9012,10 @@ global env has_x OS autofocus_mainwindow
       "focus ${parent}.drw; set cadgrid \[${parent}.statusbar.5 get\]; xschem set cadgrid \$cadgrid"
     bind ${parent}.statusbar.3 <Leave> \
       "focus ${parent}.drw; set cadsnap \[${parent}.statusbar.3 get\]; xschem set cadsnap \$cadsnap"
+    
+    focus ${parent}.drw
   }
+  
 }
 
 ## this function sets up all tk windows and binds X events. It is executed by xinit.c after completing