Make hgk handle filenames with spaces (issue49)
authorThomas Arendsen Hein <thomas@intevation.de>
Sun, 01 Jul 2007 19:15:25 +0200
changeset 4741 4a84f7421692
parent 4740 e1d1b22bab57
child 4742 438603c1eb6f
child 4758 a72dd3bfce41
Make hgk handle filenames with spaces (issue49)
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
 }