From 629d667eba58d9b2cab8c4460da37af6159ee636 Mon Sep 17 00:00:00 2001
From: stefan schippers <stefan.schippers@gmail.com>
Date: Tue, 7 Oct 2025 02:17:07 +0200
Subject: [PATCH] file_chooser: when clicking directory item clear preview,
 unselect file items

---
 src/xschem.tcl | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/src/xschem.tcl b/src/xschem.tcl
index ecff7e5a..c2f83646 100644
--- a/src/xschem.tcl
+++ b/src/xschem.tcl
@@ -5511,8 +5511,15 @@ proc file_chooser {} {
   #   file_chooser_select_preview
   # }
   bind .ins.center.leftdir.l <<ListboxSelect>> {
+    set file_chooser(abs_filename) {}
+    set file_chooser(rel_filename) {}
+    set file_chooser(fullpathlist) {}
+    set file_chooser(files) {}
+    .ins.center.left.l selection clear 0 end
+    xschem preview_window close .ins.center.right {}
+    .ins.center.right configure -bg white
+
     file_chooser_filelist
-    file_chooser_select_preview
   }
   bind .ins.center.left.l <<ListboxSelect>> {
     if { [xschem get ui_state] & 8192 } {