diff --git a/git-gui/git-gui.sh b/git-gui/git-gui.sh
index 60e79ca1b01bc8b057abe17ddab484699a7f5fdb..7cbc977ea29f2d0060476c3973df16c5abf6fe12 100755 (executable)
--- a/git-gui/git-gui.sh
+++ b/git-gui/git-gui.sh
proc blame_incremental_status {w} {
global blame_status blame_data
proc blame_incremental_status {w} {
global blame_status blame_data
+ set have $blame_data($w,blame_lines)
+ set total $blame_data($w,total_lines)
+ set pdone 0
+ if {$total} {set pdone [expr {100 * $have / $total}]}
+
set blame_status($w) [format \
"Loading annotations... %i of %i lines annotated (%2i%%)" \
set blame_status($w) [format \
"Loading annotations... %i of %i lines annotated (%2i%%)" \
- $blame_data($w,blame_lines) \
- $blame_data($w,total_lines) \
- [expr {100 * $blame_data($w,blame_lines)
- / $blame_data($w,total_lines)}]]
+ $have $total $pdone]
}
proc blame_click {w w_cmit w_line w_file cur_w pos} {
}
proc blame_click {w w_cmit w_line w_file cur_w pos} {