From: Pat Thoyts <patthoyts@users.sourceforge.net>
Date: Fri, 6 Nov 2009 15:26:07 +0000 (+0000)
Subject: Added a time wrapper around updatecommits
X-Git-Url: http://privyetmir.co.uk/gitweb?a=commitdiff_plain;h=refs%2Fheads%2Fpt%2Ftiming-updatecommits;p=gitk

Added a time wrapper around updatecommits

Signed-off-by: Pat Thoyts <patthoyts@users.sourceforge.net>
---

diff --git a/gitk b/gitk
index db5ec54..d701d4b 100755
--- a/gitk
+++ b/gitk
@@ -445,6 +445,11 @@ proc getcommits {selid} {
 }
 
 proc updatecommits {} {
+    set t [time {updatecommits_real} 1]
+    puts "$t"
+}
+
+proc updatecommits_real {} {
     global curview vcanopt vorigargs vfilelimit viewinstances
     global viewactive viewcomplete tclencoding
     global startmsecs showneartags showlocalchanges
@@ -11339,6 +11344,7 @@ if {[info exists permviews]} {
 
 if {[tk windowingsystem] eq "win32"} {
     focus -force .
+    bind . <Control-F2> {console show}
 }
 
 getcommits {}