mod_perl using_frontend_proxy fix

diff --git a/Changes b/Changes
index e66babd..4221d22 100644 (file)
--- a/Changes
+++ b/Changes
@@ -22,6 +22,9 @@
      both by bumping the Class::Load dependency, and also adding an explicit
      '1;' to the end of the classes, avoiding the context issue.
 
+   - Fix using_frontend_proxy support in mod_perl by using the psgi wrapped
+     in default middleware in mod_perl context, rather than the raw psgi.
+
 5.90005 - 2011-10-22 13:35:00
 
   New features:

diff --git a/lib/Catalyst.pm b/lib/Catalyst.pm
index f69afe0..d40b2a5 100644 (file)
--- a/lib/Catalyst.pm
+++ b/lib/Catalyst.pm
@@ -2652,7 +2652,7 @@ sub setup_engine {
 
         $meta->add_method(handler => sub {
             my $r = shift;
-            my $psgi_app = $class->psgi_app;
+            my $psgi_app = $class->_finalized_psgi_app;
             $apache->call_app($r, $psgi_app);
         });