diff options
Diffstat (limited to 't/base')
| -rwxr-xr-x | t/base/rs.t | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/t/base/rs.t b/t/base/rs.t index 5428603304..52a957260f 100755 --- a/t/base/rs.t +++ b/t/base/rs.t @@ -85,6 +85,7 @@ $bar = <TESTFILE>; if ($bar eq "78") {print "ok 10\n";} else {print "not ok 10\n";} # Get rid of the temp file +close TESTFILE; unlink "./foo"; # Now for the tricky bit--full record reading @@ -120,6 +121,7 @@ if ($^O eq 'VMS') { $bar = <TESTFILE>; if ($bar eq "z\n") {print "ok 14\n";} else {print "not ok 14\n";} + close TESTFILE; unlink "./foo.bar"; unlink "./foo.com"; } else { |