summaryrefslogtreecommitdiff
path: root/t/harness
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>1999-07-25 04:56:56 +0000
committerGurusamy Sarathy <gsar@cpan.org>1999-07-25 04:56:56 +0000
commitadac82c7012022865800c6235e0a0d8b8710e279 (patch)
treed4115ed17a218f6e06aed4c85487d807842bdc85 /t/harness
parent7399586d384137f7ae66bcc82a83b0df7dd429e5 (diff)
downloadperl-adac82c7012022865800c6235e0a0d8b8710e279.tar.gz
fix little utf8 nits in testsuite; add patch from Ilya that cures
a utf8 bug in one of the new RE optimizations p4raw-id: //depot/perl@3730
Diffstat (limited to 't/harness')
-rw-r--r--t/harness2
1 files changed, 1 insertions, 1 deletions
diff --git a/t/harness b/t/harness
index c46a87090c..b89b35ac85 100644
--- a/t/harness
+++ b/t/harness
@@ -57,7 +57,7 @@ EOT
@tests = grep (!$infinite{$_}, @tests);
@tests = map {
my $new = $_;
- if ($datahandle{$_} && !( -f $new.t) ) {
+ if ($datahandle{$_} && !( -f "$new.t") ) {
$new .= '.t';
local(*F, *T);
open(F,"<$_") or die "Can't open $_: $!";