# HG changeset patch
# User Thomas Arendsen Hein <thomas@intevation.de>
# Date 1183310125 -7200
# Node ID 4a84f7421692a360508a7a7de392d7f9f9717a52
# Parent  e1d1b22bab579d2e9908398107d88840c7ec58c6
Make hgk handle filenames with spaces (issue49)

diff -r e1d1b22bab57 -r 4a84f7421692 contrib/hgk
--- a/contrib/hgk	Sun Jul 01 15:22:49 2007 +0200
+++ b/contrib/hgk	Sun Jul 01 19:15:25 2007 +0200
@@ -2819,7 +2819,9 @@
 	}
 	return
     }
-    set file [lindex $line 5]
+    set tab1 [expr [string first "\t" $line] + 1]
+    set tab2 [expr [string first "\t" $line $tab1] - 1]
+    set file [string range $line $tab1 $tab2]
     lappend treediff $file
 }