diff options
| author | Charles Lane <lane@DUPHY4.Physics.Drexel.Edu> | 2001-10-19 13:26:35 -0400 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-10-19 20:28:48 +0000 |
| commit | b9f7662e34a81edde48af3890de15316e7fd5faf (patch) | |
| tree | 42d2e758ef416585da6b586a70bce7ed8f9df0fc /lib/Test | |
| parent | 929ab8fa019a682abadfe447d320ad0cfa312597 (diff) | |
| download | perl-b9f7662e34a81edde48af3890de15316e7fd5faf.tar.gz | |
two fake test failures on VMS fixed
Message-Id: <011019172623.11292c@DUPHY4.Physics.Drexel.Edu>
p4raw-id: //depot/perl@12512
Diffstat (limited to 'lib/Test')
| -rw-r--r-- | lib/Test/Simple/t/output.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Test/Simple/t/output.t b/lib/Test/Simple/t/output.t index ef89a0705b..69682e47ae 100644 --- a/lib/Test/Simple/t/output.t +++ b/lib/Test/Simple/t/output.t @@ -35,7 +35,7 @@ close *$out; undef $out; open(IN, 'foo') or die $!; chomp(my $line = <IN>); - +close IN; ok($line eq 'hi!'); open(FOO, ">>foo") or die $!; |