diff options
| author | Craig A. Berry <craigberry@mac.com> | 2014-09-25 07:12:30 -0500 |
|---|---|---|
| committer | Craig A. Berry <craigberry@mac.com> | 2014-09-25 08:15:34 -0500 |
| commit | 717049dd20736062e34108e9929836325015aa55 (patch) | |
| tree | da2866755d9ea4b9d27629b67f301a4cc7dd4d37 /cpan | |
| parent | 717feafc134edebccf30e580526055d3a75a0a59 (diff) | |
| download | perl-717049dd20736062e34108e9929836325015aa55.tar.gz | |
In autodie's truncate.t, close $tmpfile before opening again.
Waiting to be merged upstream: see CPAN RT#96609.
Diffstat (limited to 'cpan')
| -rw-r--r-- | cpan/autodie/t/truncate.t | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/cpan/autodie/t/truncate.t b/cpan/autodie/t/truncate.t index df6270e6f4..7af7226428 100644 --- a/cpan/autodie/t/truncate.t +++ b/cpan/autodie/t/truncate.t @@ -62,6 +62,8 @@ eval { is($@, "", "Truncating a normal file should be fine"); +$tmpfh->close; + # Time to test truncating via globs. # Firstly, truncating a closed filehandle should fail. |