aboutsummaryrefslogtreecommitdiff
path: root/gitk
diff options
context:
space:
mode:
authorPaul Mackerras <paulus@samba.org>2006-07-18 01:52:14 +1000
committerPaul Mackerras <paulus@samba.org>2006-07-18 01:52:14 +1000
commite1a7c81f6a8c5a96a3d07632514f85d9470c3a82 (patch)
treef724f49c643f8a320ce3799984c4717cc889e4f6 /gitk
parent8a48571ce52e5182ea32ed168e298882f8c470b3 (diff)
downloadgit-e1a7c81f6a8c5a96a3d07632514f85d9470c3a82.tar.gz
git-e1a7c81f6a8c5a96a3d07632514f85d9470c3a82.tar.xz
gitk: Minor cleanups
Removed some unnecessary quotes and globals, updated copyright notice. Signed-off-by: Paul Mackerras <paulus@samba.org>
Diffstat (limited to 'gitk')
-rwxr-xr-xgitk12
1 files changed, 5 insertions, 7 deletions
diff --git a/gitk b/gitk
index 7d540c1b0..7b86c1916 100755
--- a/gitk
+++ b/gitk
@@ -2,7 +2,7 @@
# Tcl ignores the next line -*- tcl -*- \
exec wish "$0" -- "$@"
-# Copyright (C) 2005 Paul Mackerras. All rights reserved.
+# Copyright (C) 2005-2006 Paul Mackerras. All rights reserved.
# This program is free software; it may be used, copied, modified
# and distributed under the terms of the GNU General Public Licence,
# either version 2, or (at your option) any later version.
@@ -341,13 +341,13 @@ proc readrefs {} {
set tag {}
catch {
set commit [exec git rev-parse "$id^0"]
- if {"$commit" != "$id"} {
+ if {$commit != $id} {
set tagids($name) $commit
lappend idtags($commit) $name
}
}
catch {
- set tagcontents($name) [exec git cat-file tag "$id"]
+ set tagcontents($name) [exec git cat-file tag $id]
}
} elseif { $type == "heads" } {
set headids($name) $id
@@ -3263,8 +3263,7 @@ proc show_status {msg} {
proc finishcommits {} {
global commitidx phase curview
- global canv mainfont ctext maincursor textcursor
- global findinprogress pending_select
+ global pending_select
if {$commitidx($curview) > 0} {
drawrest
@@ -3307,9 +3306,7 @@ proc notbusy {what} {
}
proc drawrest {} {
- global numcommits
global startmsecs
- global canvy0 numcommits linespc
global rowlaidout commitidx curview
global pending_select
@@ -3323,6 +3320,7 @@ proc drawrest {} {
}
set drawmsecs [expr {[clock clicks -milliseconds] - $startmsecs}]
+ #global numcommits
#puts "overall $drawmsecs ms for $numcommits commits"
}