fix broken tests for new psgi logging code

 * lib/Catalyst/Log.pm
   * document clear_psgi for podcoverage.t
   * add psgienv to stopwords for spelling.t

 * t/lib/TestApp/View/Dump.pm
   * clear_psgienv() is now called clear_psgi()

Signed-off-by: John Napiorkowski <jjnapiork@cpan.org>

diff --git a/lib/Catalyst/Log.pm b/lib/Catalyst/Log.pm
index 42aff02..d72ee16 100644 (file)
--- a/lib/Catalyst/Log.pm
+++ b/lib/Catalyst/Log.pm
@@ -162,6 +162,8 @@ __PACKAGE__->meta->make_immutable(inline_constructor => 0);
 
 __END__
 
+=for stopwords psgienv
+
 =head1 NAME
 
 Catalyst::Log - Catalyst Log Class
@@ -301,6 +303,10 @@ the right place. If the environment has a C<psgix.logger>, it will be used. If
 not, we will send logs to C<psgi.errors> if that exists. As a last fallback, we
 will send to STDERR as before.
 
+=head2 clear_psgi
+
+Clears the PSGI environment attributes set by L</psgienv>.
+
 =head2 meta
 
 =head1 SEE ALSO

diff --git a/t/lib/TestApp/View/Dump.pm b/t/lib/TestApp/View/Dump.pm
index 43cc976..dff41e8 100644 (file)
--- a/t/lib/TestApp/View/Dump.pm
+++ b/t/lib/TestApp/View/Dump.pm
@@ -40,7 +40,7 @@ sub process {
     my $context = delete $reference->{_context};
 
     if (my $log = $reference->{_log}) {
-        $log->clear_psgienv if $log->can('psgienv');
+        $log->clear_psgi if ($log->can('psgienv'));
     }
 
     if ( my $output =