diff -Naur tkcvs_7_2_1/tkdiff/tkdiff tkcvs_7_2_1-patched/tkdiff/tkdiff
--- tkcvs_7_2_1/tkdiff/tkdiff	2004-04-25 07:16:19.000000000 +0200
+++ tkcvs_7_2_1-patched/tkdiff/tkdiff	2004-06-29 16:32:50.000000000 +0200
@@ -32,6 +32,8 @@
 #          Options:
 #              -a <ancestor_file>
 #              -o <merge output file>
+#              -L <label for left file>
+#              -L <label for left file> -L <label for right file>
 #
 # This program is free software; you can redistribute it and/or modify
 # it under the terms of the GNU General Public License as published by
@@ -975,6 +977,7 @@
     set argindex 0
     set revs 0
     set pths 0
+    set file_labels 0
     set conflict 0
 
     # Loop through argv, storing revision args in rev and file args in
@@ -1000,6 +1003,15 @@
                 incr revs
                 set rev($revs) [string range $arg 2 end]
             }
+        "^-L$" {
+                incr argindex
+                incr file_labels
+                set file_label($file_labels) [lindex $argv $argindex]
+            }
+        "^-L.*" {
+                incr file_labels
+                set file_label($file_labels) [string range $arg 2 end]
+            }
         "^-v$" {
                 incr argindex
                 incr revs
@@ -1041,6 +1053,10 @@
         incr argindex
     }
 
+    if {$file_labels > 2} {
+            fatal-error "You cannot supply more than two -L options"
+    }
+
     # Now check how many revision and file args we have.
     # puts stderr "$revs revs   $pths pths"
     if {$conflict} {
@@ -1132,6 +1148,13 @@
         }
     }
 
+    if {$file_labels > 0} {
+	set finfo(lbl,1) "$file_label(1)"
+    }
+    if {$file_labels == 2} {
+	set finfo(lbl,2) "$file_label(2)"
+    }
+
     set finfo(title) "[file tail $finfo(lbl,1)] vs. [file tail $finfo(lbl,2)]"
     set rootname [file rootname $finfo(pth,1)]
     #    set path          [file dirname          $finfo(pth,1)]
@@ -7066,6 +7089,8 @@
     Additional optional parameters:
 	<cmp>-a ANCESTORFILE </cmp>
 	<cmp>-o MERGEOUTPUTFILE </cmp>
+	<cmp>-L LEFT_FILE_LABEL</cmp>
+	<cmp>-L LEFT_FILE_LABEL -L RIGHT_FILE_LABEL</cmp>
 
 $g(name) detects and supports RCS, CVS, Subversion and SCCS by looking for a directory with the same name. It detects and supports PVCS by looking for a vcs.cfg file. It detects and supports AccuRev and Perforce by looking for the environment variables named ACCUREV_BIN and P4CLIENT respectively.
 
diff -Naur tkcvs_7_2_1/tkdiff-svn-wrapper tkcvs_7_2_1-patched/tkdiff-svn-wrapper
--- tkcvs_7_2_1/tkdiff-svn-wrapper	1970-01-01 01:00:00.000000000 +0100
+++ tkcvs_7_2_1-patched/tkdiff-svn-wrapper	2004-06-29 17:06:06.000000000 +0200
@@ -0,0 +1,16 @@
+#!/bin/bash 
+ARGS=("$@") # creates an array variable 
+LABEL1="${ARGS[$(($#-5))]}"; unset ARGS[$(($#-5))] 
+DUMMY="${ARGS[$(($#-4))]}"; unset ARGS[$(($#-4))] 
+LABEL2="${ARGS[$(($#-3))]}"; unset ARGS[$(($#-3))] 
+FILE1="${ARGS[$(($#-2))]}"; unset ARGS[$(($#-2))] 
+FILE2="${ARGS[$(($#-1))]}"; unset ARGS[$(($#-1))] 
+
+tkdiff -L "$LABEL1" -L "$LABEL2" "$FILE1" "$FILE2" 
+
+# tkdiff is patched using the patch from 
+# <http://sf.net/tracker/index.php?func=detail&aid=981930&group_id=64960&atid=509274>
+# to support labels in the form of
+# Usage:
+# tkdiff -L <label for left file> ....
+# tkdiff -L <label for left file> -L <label for right file> ...