From c74fa5b11330140016a3691d22bb91162fd82b82 Mon Sep 17 00:00:00 2001
From: svk <svk@nuk-svk.ru>
Date: Wed, 28 Jan 2026 12:26:53 +0300
Subject: [PATCH] =?UTF-8?q?=D0=94=D0=BE=D0=B1=D0=B0=D0=B2=D0=BB=D0=B5?=
 =?UTF-8?q?=D0=BD=D0=BE=20=D0=BF=D0=BE=D0=B4=D0=BA=D0=BB=D1=8E=D1=87=D0=B5?=
 =?UTF-8?q?=D0=BD=D0=B8=D0=B5=20(bind)=20=D1=81=D0=BE=D1=87=D0=B5=D1=82?=
 =?UTF-8?q?=D0=B0=D0=BD=D0=B8=D1=8F=20=D0=BA=D0=BB=D0=B0=D0=B2=D0=B8=D1=88?=
 =?UTF-8?q?=D1=8C=20=D1=83=D0=BA=D0=B0=D0=B7=D0=B0=D0=BD=D0=BD=D1=8B=D1=85?=
 =?UTF-8?q?=20=D0=B2=20=D0=BD=D0=B0=D1=81=D1=82=D1=80=D0=BE=D0=B9=D0=BA?=
 =?UTF-8?q?=D0=B0=D1=85=20=D0=B8=D0=BD=D1=81=D1=82=D1=80=D1=83=D0=BC=D0=B5?=
 =?UTF-8?q?=D0=BD=D1=82=D0=BE=D0=B2.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 lib/tools.tcl | 1 +
 1 file changed, 1 insertion(+)

diff --git a/lib/tools.tcl b/lib/tools.tcl
index a15c9d1..bcece50 100644
--- a/lib/tools.tcl
+++ b/lib/tools.tcl
@@ -124,6 +124,7 @@ proc Tools::GetMenu {m} {
         if {[info exists cmd] == 1 && $cmd ne ""} {
             if {[info exists shortCut] == 1 && $shortCut ne ""} {
                 $m add command -label $toolName -accelerator $shortCut -command [list Tools::Execute "$toolName"]
+                bind . <$shortCut>  [list Tools::Execute "$toolName"]
             } else {
                 $m add command -label $toolName -command [list Tools::Execute "$toolName"]
             }