Ignore config key added by Catalyst::Runtime 5.90080 (RT#101446)

[catagits/Catalyst-Model-DBIC-Schema.git] / t / lib / TestAppC3Fail.pm

diff --git a/t/lib/TestAppC3Fail.pm b/t/lib/TestAppC3Fail.pm
index f49d326..57711f1 100644 (file)
--- a/t/lib/TestAppC3Fail.pm
+++ b/t/lib/TestAppC3Fail.pm
@@ -16,10 +16,15 @@ my @keys = sort keys( %{ __PACKAGE__->config } );
 
 __PACKAGE__->setup;
 
-my @new_keys = sort keys( %{ __PACKAGE__->config } );
+my @new_keys = sort
+    # Ignore key added by horrid hack in Catalyst::Runtime 5.90080
+    grep { $_ ne '__configured_from_psgi_middleware'}
+    keys( %{ __PACKAGE__->config } );
+
 use Test::More;
 
-is_deeply(\@new_keys, \@keys, 'Config keys correct');
+is_deeply(\@new_keys, \@keys, 'Config keys correct')
+    or diag explain [\@keys, \@new_keys];
 
 1;