cope with changed git-diff-tree output format
diff --git a/gitk b/gitk
index a8c028b..f7ff049 100755
--- a/gitk
+++ b/gitk
@@ -7,7 +7,7 @@
# 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 @@
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 @@
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} {
