diff options
| -rw-r--r-- | lib/Term/UI/t/02_ui.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Term/UI/t/02_ui.t b/lib/Term/UI/t/02_ui.t index 18a60a461a..dbefdce55a 100644 --- a/lib/Term/UI/t/02_ui.t +++ b/lib/Term/UI/t/02_ui.t @@ -20,7 +20,7 @@ if( $ENV{PERL_CORE} ) { close *STDOUT; open *STDOUT, ">termui.$$" or diag("Could not open tempfile"); } -END { unlink "termui.$$" if $ENV{PERL_CORE} } +END { close *STDOUT && unlink "termui.$$" if $ENV{PERL_CORE} } ### so T::RL doesn't go nuts over no console |