gitk: Make line origin search update the busy status
Currently the 'show origin of this line' feature does not update the status field of the gitk window, so it is not evident that any processing is going on. It may seem at first that clicking the item had no effect. This commit adds calls to set and clear the busy status with an appropriate title, similar to other search commands. Signed-off-by: Alexander Gavrilov <angavrilov@gmail.com> Signed-off-by: Paul Mackerras <paulus@samba.org>
Alexander Gavrilov committed
Dec 1, 2008 at 20:30 UTC
f3413079d6a0d3d3cbeb506e81e647772b857f81
1 file changed
+3
gitk
+3
@@ -3402,6 +3402,7 @@ proc show_line_source {} {
3402
error_popup [mc "Couldn't start git blame: %s" $err]
3403
return
3404
}
3405
+ nowbusy blaming [mc "Searching"]
3406
fconfigure $f -blocking 0
3407
set i [reg_instance $f]
3408
set blamestuff($i) {}
@@ -3415,6 +3416,7 @@ proc stopblaming {} {
3416
if {[info exists blameinst]} {
3417
stop_instance $blameinst
3418
unset blameinst
3419
+ notbusy blaming
3420
}
3421
}
3422
@@ -3429,6 +3431,7 @@ proc read_line_source {fd inst} {
3431
}
3432
unset commfd($inst)
3433
unset blameinst
3434
+ notbusy blaming
3435
fconfigure $fd -blocking 1
3436
if {[catch {close $fd} err]} {
3437
error_popup [mc "Error running git blame: %s" $err]