fix broken tests for new psgi logging code

[catagits/Catalyst-Runtime.git] / t / lib / TestApp / View / Dump.pm

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 =