diff options
Diffstat (limited to 'ext/Encode/t/perlio.t')
| -rw-r--r-- | ext/Encode/t/perlio.t | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/ext/Encode/t/perlio.t b/ext/Encode/t/perlio.t index 1b1de895a0..012bbe6099 100644 --- a/ext/Encode/t/perlio.t +++ b/ext/Encode/t/perlio.t @@ -122,10 +122,10 @@ for my $src (sort keys %e) { dump2file("$pfile.$seq", $dtext); } } - unless ( $DEBUG ) { - 1 while unlink $sfile; - 1 while unlink $pfile; - } + if ( ! $DEBUG ) { + 1 while unlink ($sfile); + 1 while unlink ($pfile); + } } } |