Show More
@@ -2819,7 +2819,9 b' proc gettreediffline {gdtf ids} {' | |||
|
2819 | 2819 | } |
|
2820 | 2820 | return |
|
2821 | 2821 | } |
|
2822 | set file [lindex $line 5] | |
|
2822 | set tab1 [expr [string first "\t" $line] + 1] | |
|
2823 | set tab2 [expr [string first "\t" $line $tab1] - 1] | |
|
2824 | set file [string range $line $tab1 $tab2] | |
|
2823 | 2825 | lappend treediff $file |
|
2824 | 2826 | } |
|
2825 | 2827 |
General Comments 0
You need to be logged in to leave comments.
Login now