Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
work around Parrot's INIT difficulties
Using INIT here doesn't buy us anything in any case.
  • Loading branch information
TimToady committed Sep 12, 2014
1 parent 5d73e24 commit a9aebc1
Showing 1 changed file with 3 additions and 9 deletions.
12 changes: 3 additions & 9 deletions lib/Test.pm
Expand Up @@ -23,15 +23,9 @@ my $time_before;
my $time_after;

# Output should always go to real stdout/stderr, not to any dynamic overrides.
my $output;
my $failure_output;
my $todo_output;

INIT {
$output = $PROCESS::OUT;
$failure_output = $PROCESS::ERR;
$todo_output = $PROCESS::OUT;
}
my $output = $PROCESS::OUT;
my $failure_output = $PROCESS::ERR;
my $todo_output = $PROCESS::OUT;

## If done_testing hasn't been run when we hit our END block, we need to know
## so that it can be run. This allows compatibility with old tests that use
Expand Down

0 comments on commit a9aebc1

Please sign in to comment.