diff --git a/src/xschem.tcl b/src/xschem.tcl
index f8763c94..016a18f2 100644
--- a/src/xschem.tcl
+++ b/src/xschem.tcl
@@ -4072,7 +4072,7 @@ proc property_search {} {
     bind .dialog <Escape> {.dialog.but.cancel invoke}
     bind .dialog <Return> {.dialog.but.ok invoke}
     wm protocol .dialog WM_DELETE_WINDOW {.dialog.but.cancel invoke} 
-    grab set .dialog
+    # grab set .dialog
     tkwait window .dialog
     xschem set semaphore [expr {[xschem get semaphore] -1}]
   }