From f824f26c4fa536599cefe18ac15f25f305e23d95 Mon Sep 17 00:00:00 2001
From: stefan schippers <stefan.schippers@gmail.com>
Date: Sat, 4 Jan 2025 12:39:22 +0100
Subject: [PATCH] click on posted menu will unpost it. Now no more Motion event
 is needed to repost again the menu by another click

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

diff --git a/src/xschem.tcl b/src/xschem.tcl
index 97d47a1b..739d6f29 100644
--- a/src/xschem.tcl
+++ b/src/xschem.tcl
@@ -8880,6 +8880,8 @@ if {$text_replace_selection && $OS != "Windows"} {
 bind Menu <Button> {
    if { [%W cget -type] eq "menubar" && [info exists tk::Priv(menuActivated)]} {
      %W activate none
+   } else {
+     %W activate @%x,%y
    }
    tk::MenuButtonDown %W
 }