summaryrefslogtreecommitdiff
path: root/lib/status_bar.tcl
diff options
context:
space:
mode:
authorShawn O. Pearce <spearce@spearce.org>2007-10-21 00:43:36 (GMT)
committerShawn O. Pearce <spearce@spearce.org>2007-10-21 00:43:36 (GMT)
commitc9dcc7f865fb7891f4f6d068230663eb2cb586a7 (patch)
treedda2dc1770bbc3115a4487f0b32e3323e899fd97 /lib/status_bar.tcl
parenta5bb31fb6323b53559b0d15ce2d02a7ba6d74bed (diff)
parentbbbadf6e58f72ac6bf739d2a1109cbd872eb1083 (diff)
downloadgit-c9dcc7f865fb7891f4f6d068230663eb2cb586a7.zip
git-c9dcc7f865fb7891f4f6d068230663eb2cb586a7.tar.gz
git-c9dcc7f865fb7891f4f6d068230663eb2cb586a7.tar.bz2
Merge branch 'maint'
* maint: git-gui: Don't display CR within console windows git-gui: Handle progress bars from newer gits git-gui: Correctly report failures from git-write-tree Conflicts: lib/commit.tcl lib/console.tcl
Diffstat (limited to 'lib/status_bar.tcl')
-rw-r--r--lib/status_bar.tcl5
1 files changed, 4 insertions, 1 deletions
diff --git a/lib/status_bar.tcl b/lib/status_bar.tcl
index 5c5bf7c..51d4177 100644
--- a/lib/status_bar.tcl
+++ b/lib/status_bar.tcl
@@ -97,7 +97,10 @@ method update_meter {buf} {
set prior [string range $meter 0 $r]
set meter [string range $meter [expr {$r + 1}] end]
- if {[regexp "\\((\\d+)/(\\d+)\\)\\s+done\r\$" $prior _j a b]} {
+ set p "\\((\\d+)/(\\d+)\\)"
+ if {[regexp ":\\s*\\d+% $p\(?:, done.\\s*\n|\\s*\r)\$" $prior _j a b]} {
+ update $this $a $b
+ } elseif {[regexp "$p\\s+done\r\$" $prior _j a b]} {
update $this $a $b
}
}