return $status;
}
-=item $c->finalize_output
-
-alias to finalize_body
-
=item $c->finalize_body
Finalize body.
sub stash {
my $self = shift;
- if ( $_[0] ) {
- my $stash = $_[1] ? {@_} : $_[0];
+ if ( @_ ) {
+ my $stash = @_ > 1 ? {@_} : $_[0];
while ( my ( $key, $val ) = each %$stash ) {
$self->{stash}->{$key} = $val;
}