Skip to content

Commit

Permalink
[difference between patch application from Change 904 and Change 905]
Browse files Browse the repository at this point in the history
seems like a test accounting disagreement with
42293d1

p4raw-link: @904 on //depot/maint-5.004/perl: 0af7994
p4raw-id: //depot/maint-5.004/perl@905
  • Loading branch information
Tim Bunce authored and Tim Bunce committed Apr 28, 1998
1 parent cf62850 commit 15e7314
Showing 1 changed file with 4 additions and 4 deletions.
8 changes: 4 additions & 4 deletions t/op/taint.t
Original file line number Diff line number Diff line change
Expand Up @@ -82,7 +82,7 @@ print PROG 'print "@ARGV\n"', "\n";
close PROG;
my $echo = "$Invoke_Perl $ECHO";

print "1..143\n";
print "1..145\n";

# First, let's make sure that Perl is checking the dangerous
# environment variables. Maybe they aren't set yet, so we'll
Expand Down Expand Up @@ -580,12 +580,12 @@ else {
{
my $why = $TAINT."y";
$why =~ s/y/z/;
test 141, tainted $why;
test 143, tainted $why;

my $z = "[z]";
$why =~ s/$z/zee/;
test 142, tainted $why;
test 144, tainted $why;

$why =~ s/e/'-'.$$/ge;
test 143, tainted $why;
test 145, tainted $why;
}

0 comments on commit 15e7314

Please sign in to comment.