summaryrefslogtreecommitdiff
path: root/gitk
diff options
context:
space:
mode:
Diffstat (limited to 'gitk')
-rwxr-xr-xgitk11
1 files changed, 4 insertions, 7 deletions
diff --git a/gitk b/gitk
index a8c028b..f7ff049 100755
--- a/gitk
+++ b/gitk
@@ -7,7 +7,7 @@ exec wish "$0" -- "${1+$@}"
# and distributed under the terms of the GNU General Public Licence,
# either version 2, or (at your option) any later version.
-# CVS $Revision: 1.19 $
+# CVS $Revision: 1.20 $
proc getcommits {rargs} {
global commits commfd phase canv mainfont
@@ -448,7 +448,7 @@ Copyright © 2005 Paul Mackerras
Use and redistribute under the terms of the GNU General Public License
-(CVS $Revision: 1.19 $)} \
+(CVS $Revision: 1.20 $)} \
-justify center -aspect 400
pack $w.m -side top -fill x -padx 20 -pady 20
button $w.ok -text Close -command "destroy $w"
@@ -1099,11 +1099,8 @@ proc gettreediffline {gdtf id} {
addtocflist $id
return
}
- set type [lindex $line 1]
- set file [lindex $line 3]
- if {$type == "blob"} {
- lappend treediffs($id) $file
- }
+ set file [lindex $line 5]
+ lappend treediffs($id) $file
}
proc getblobdiffs {id} {