git-gui: Set a proper title on our revert confirm dialog box.
Signed-off-by: Shawn O. Pearce <spearce@spearce.org>
This commit is contained in:
parent
84e0bf1de4
commit
9208487b34
9
git-gui
9
git-gui
@ -2387,6 +2387,7 @@ proc do_include_all {} {
|
|||||||
}
|
}
|
||||||
|
|
||||||
proc revert_helper {txt paths} {
|
proc revert_helper {txt paths} {
|
||||||
|
global gitdir appname
|
||||||
global file_states current_diff
|
global file_states current_diff
|
||||||
|
|
||||||
if {![lock_index begin-update]} return
|
if {![lock_index begin-update]} return
|
||||||
@ -2419,13 +2420,17 @@ proc revert_helper {txt paths} {
|
|||||||
set s "these $n files"
|
set s "these $n files"
|
||||||
}
|
}
|
||||||
|
|
||||||
|
set reponame [lindex [file split \
|
||||||
|
[file normalize [file dirname $gitdir]]] \
|
||||||
|
end]
|
||||||
|
|
||||||
set reply [tk_dialog \
|
set reply [tk_dialog \
|
||||||
.confirm_revert \
|
.confirm_revert \
|
||||||
"title" \
|
"$appname ($reponame)" \
|
||||||
"Revert unincluded changes in $s?
|
"Revert unincluded changes in $s?
|
||||||
|
|
||||||
Any unincluded changes will be permanently lost by the revert." \
|
Any unincluded changes will be permanently lost by the revert." \
|
||||||
questhead \
|
question \
|
||||||
1 \
|
1 \
|
||||||
{Do Nothing} \
|
{Do Nothing} \
|
||||||
{Revert Changes} \
|
{Revert Changes} \
|
||||||
|
Loading…
Reference in New Issue
Block a user