From ea111c6f3214ec33c74228a8f9c68baef82bb092 Mon Sep 17 00:00:00 2001 From: svkalinin Date: Thu, 20 Oct 2022 10:18:06 +0300 Subject: [PATCH] =?UTF-8?q?=D0=98=D1=81=D0=BF=D1=80=D0=B0=D0=B2=D0=BB?= =?UTF-8?q?=D0=B5=D0=BD=D0=B0=20=D0=BE=D1=88=D0=B8=D0=B1=D0=BA=D0=B0=20?= =?UTF-8?q?=D0=BF=D1=80=D0=B8=20=D0=BA=D0=BB=D0=B8=D0=BA=D0=B5=20=D0=BD?= =?UTF-8?q?=D0=B0=20=D1=81=D0=BF=D0=B8=D1=81=D0=BA=D0=B5=20=D1=81=20=D1=84?= =?UTF-8?q?=D0=B0=D0=B9=D0=BB=D0=B0=D0=BC=D0=B8?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- lib/git.tcl | 8 ++++++-- projman.tcl | 2 +- 2 files changed, 7 insertions(+), 3 deletions(-) diff --git a/lib/git.tcl b/lib/git.tcl index d98e756..6dfc3e3 100644 --- a/lib/git.tcl +++ b/lib/git.tcl @@ -198,7 +198,11 @@ namespace eval Git { } proc ListBoxPress {w} { - set fileName [$w.body.lBox get [$w.body.lBox curselection]] + if {[$w.body.lBox curselection] ne ""} { + set fileName [$w.body.lBox get [$w.body.lBox curselection]] + } else { + return + } # puts $values $w.body.t delete 1.0 end set i 0 @@ -380,7 +384,7 @@ namespace eval Git { catch { $fr.body.lBox activate 0 ; $fr.body.lBox selection set 0 0 } bind $fr.body.lBox "Git::CommitAdd $fr" - bind $fr.body.lBox "catch {Git::CommitAdd $fr}" + bind $fr.body.lBox "catch {Git::CommitAdd $fr}; break" bind $fr.body.lBox "Git::ListBoxPress $fr" bind $fr.body.lBox "Git::Key %K $fr" diff --git a/projman.tcl b/projman.tcl index 80acb65..41ec77e 100755 --- a/projman.tcl +++ b/projman.tcl @@ -10,7 +10,7 @@ exec wish "$0" -- "$@" ###################################################### # Version: 2.0.0 # Release: alpha -# Build: 20102022095949 +# Build: 20102022100319 ###################################################### # определим текущую версию, релиз и т.д.