From bbfe350e3ff82b85b1b9757c2160484ecdca0776 Mon Sep 17 00:00:00 2001
From: stefan schippers <stefan.schippers@gmail.com>
Date: Sun, 5 Oct 2025 04:44:45 +0200
Subject: [PATCH] proc file_chooser_place: dont do anything if semaphore >0

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

diff --git a/src/xschem.tcl b/src/xschem.tcl
index 553c3999..41434907 100644
--- a/src/xschem.tcl
+++ b/src/xschem.tcl
@@ -5158,6 +5158,7 @@ proc file_chooser_filelist {} {
 proc file_chooser_place {action} {
   # puts file_chooser_place
   global file_chooser open_in_new_window
+  if {[xschem get semaphore] > 0} {return}
   set sel [.ins.center.left.l curselection]
   if {$sel eq {}} {
     set sel [.ins.center.left.l index active]