Commit 0c0387e7 by Mark Mitchell

Fix typo in previous checkin

From-SVN: r99748
parent 5595de0f
...@@ -287,7 +287,7 @@ proc compat-execute { src1 sid use_alt } { ...@@ -287,7 +287,7 @@ proc compat-execute { src1 sid use_alt } {
if {[string first "$srcdir/" "$src1"] == 0} { if {[string first "$srcdir/" "$src1"] == 0} {
set testcase [string range "$src1" [string length "$srcdir/"] end] set testcase [string range "$src1" [string length "$srcdir/"] end]
} }
if {[string first "$tmpdir/" "$src1"] == 0} { if {[string first "$tmpdir/" "$testcase"] == 0} {
set testcase [string range "$src1" [string length "$tmpdir/"] end] set testcase [string range "$src1" [string length "$tmpdir/"] end]
} }
regsub "_main.*" $testcase "" testcase regsub "_main.*" $testcase "" testcase
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment