diff options
author | Tony Cook <tony@develop-help.com> | 2019-01-28 14:11:50 +1100 |
---|---|---|
committer | Tony Cook <tony@develop-help.com> | 2019-01-28 15:28:05 +1100 |
commit | 6bf77a4bea241aa338f9a8d7ba6aaf25db91e34b (patch) | |
tree | d64ead1292d377b55030e4966be46dc778df0c97 /t/io | |
parent | 0f9a6232f0af0895807ddd0afae2d5512aa91bf9 (diff) | |
download | perl-6bf77a4bea241aa338f9a8d7ba6aaf25db91e34b.tar.gz |
don't leak temp files
the test I added allocated more temp files, but didn't arrange for
backup files to be cleaned up.
Modified the cleanup to clean up every generated temp and backup file
even if more are allocated in the future with mkfiles()
Diffstat (limited to 't/io')
-rw-r--r-- | t/io/nargv.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/io/nargv.t b/t/io/nargv.t index 4482572aeb..a62c4f265e 100644 --- a/t/io/nargv.t +++ b/t/io/nargv.t @@ -137,4 +137,4 @@ sub mkfiles { return wantarray ? @results : @results[-1]; } -END { unlink_all map { ($_, "$_.bak") } mkfiles(1..5) } +END { unlink_all map { ($_, "$_.bak") } @files } |