From: Shawn O. Pearce <spearce@spearce.org>
Date: Wed, 4 Jul 2007 06:29:32 +0000 (-0400)
Subject: git-gui: Unlock the index when cancelling merge dialog
X-Git-Tag: gitgui-0.7.5~8
X-Git-Url: https://git.lorimer.id.au/gitweb.git/diff_plain/c8e23aaf1814b95d64fc536fdf1acaa54bb28411?ds=sidebyside

git-gui: Unlock the index when cancelling merge dialog

Pressing the escape key while in the merge dialog cancels the merge
and correctly unlocks the index.  Unfortunately this is not true of
the Cancel button, using it closes the dialog but does not release
the index lock, rendering git-gui frozen until you restart it.  We
now properly release the index lock when the Cancel button is used.

Signed-off-by: Shawn O. Pearce <spearce@spearce.org>
---

diff --git a/lib/merge.tcl b/lib/merge.tcl
index ae0389df5b..889182f545 100644
--- a/lib/merge.tcl
+++ b/lib/merge.tcl
@@ -213,7 +213,9 @@ proc dialog {} {
 	pack $w.buttons.visualize -side left
 	button $w.buttons.create -text Merge -command $_start
 	pack $w.buttons.create -side right
-	button $w.buttons.cancel -text {Cancel} -command [list destroy $w]
+	button $w.buttons.cancel \
+		-text {Cancel} \
+		-command "unlock_index;destroy $w"
 	pack $w.buttons.cancel -side right -padx 5
 	pack $w.buttons -side bottom -fill x -pady 10 -padx 10