summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: 81fb7ef)
raw | patch | inline | side by side (parent: 81fb7ef)
author | Shawn O. Pearce <spearce@spearce.org> | |
Sat, 2 Jun 2007 18:45:35 +0000 (14:45 -0400) | ||
committer | Shawn O. Pearce <spearce@spearce.org> | |
Wed, 6 Jun 2007 05:26:49 +0000 (01:26 -0400) |
This list used to store the commits in the order we received
them in. I originally was using it to update the colors of
the commit before and the commit after the current commit,
but since that interface concept turned out to be horribly
ugly and has been removed we no longer need this list.
Signed-off-by: Shawn O. Pearce <spearce@spearce.org>
them in. I originally was using it to update the colors of
the commit before and the commit after the current commit,
but since that interface concept turned out to be horribly
ugly and has been removed we no longer need this list.
Signed-off-by: Shawn O. Pearce <spearce@spearce.org>
lib/blame.tcl | patch | blob | history |
diff --git a/lib/blame.tcl b/lib/blame.tcl
index 0666dcadc19361bcc981f4385c9138a6f3525499..a01e22385baf8a8fed99f104251772f77ef35648 100644 (file)
--- a/lib/blame.tcl
+++ b/lib/blame.tcl
field total_lines 0 ; # total length of file
field blame_lines 0 ; # number of lines computed
-field commit_count 0 ; # number of commits in $commit_list
-field commit_list {} ; # list of commit sha1 in receipt order
+field commit_count 0 ; # number of commits loaded
field order ; # array commit -> receipt order
field header ; # array commit,key -> header field
field line_commit ; # array line -> sha1 commit
set total_lines 0
set blame_lines 0
set commit_count 0
- set commit_list {}
array unset order
array unset line_commit
array unset line_file
set order($cmit) $commit_count
incr commit_count
- lappend commit_list $cmit
}
} elseif {[string match {filename *} $line]} {
set file [string range $line 9 end]