svk/projman
1
0
Fork 0
Code Issues 1 Pull Requests Actions Packages Projects Releases 1 Wiki Activity

beta2 #8

Merged
svk merged 49 commits from beta2 into master 2026-01-28 12:45:48 +03:00
Conversation 0 Commits 49 Files Changed 14 +575 -58
14 changed files with 575 additions and 58 deletions
Download Patch File Download Diff File Expand all files Collapse all files
Showing only changes of commit 36d1940c7b - Show all commits

2
lib/tools.tcl
View File

@@ -124,7 +124,7 @@ proc Tools::GetMenu {m} {
if {[info exists cmd] == 1 && $cmd ne ""} { if {[info exists cmd] == 1 && $cmd ne ""} {
if {[info exists shortCut] == 1 && $shortCut ne ""} { if {[info exists shortCut] == 1 && $shortCut ne ""} {
$m add command -label $toolName -accelerator $shortCut -command [list Tools::Execute "$toolName"] $m add command -label $toolName -accelerator $shortCut -command [list Tools::Execute "$toolName"]
bind . <$shortCut> [list Tools::Execute "$toolName"] bind . <$shortCut> "[list Tools::Execute "$toolName"]; break"
} else { } else {
$m add command -label $toolName -command [list Tools::Execute "$toolName"] $m add command -label $toolName -command [list Tools::Execute "$toolName"]
} }