[Catalyst-commits] r11887 - Catalyst-Runtime/5.80/branches/basic-app-ctx-separation-cleaned/lib/Catalyst

[zby at dev.catalyst.perl.org]

Author: zby
Date: 2009-11-18 09:55:12 +0000 (Wed, 18 Nov 2009)
New Revision: 11887

Modified:
   Catalyst-Runtime/5.80/branches/basic-app-ctx-separation-cleaned/lib/Catalyst/Context.pm
Log:
calling config on app object instead of class (t/aggregate/live_component_view_single.t); registered_plugins added to methods proxied in Context

Modified: Catalyst-Runtime/5.80/branches/basic-app-ctx-separation-cleaned/lib/Catalyst/Context.pm
===================================================================
--- Catalyst-Runtime/5.80/branches/basic-app-ctx-separation-cleaned/lib/Catalyst/Context.pm	2009-11-18 08:27:11 UTC (rev 11886)
+++ Catalyst-Runtime/5.80/branches/basic-app-ctx-separation-cleaned/lib/Catalyst/Context.pm	2009-11-18 09:55:12 UTC (rev 11887)
@@ -67,6 +67,7 @@
         use_stats
         stats_class
         set_action
+        registered_plugins
 
         ran_setup
         _comp_search_prefixes
@@ -433,7 +434,6 @@
 sub view {
     my ( $c, $name, @args ) = @_;
 
-    my $appclass = ref($c) || $c;
     if( $name ) {
         my @result = $c->_comp_search_prefixes( $name, qw/View V/ );
         return map { $c->_filter_component( $_, @args ) } @result if ref $name;
@@ -446,9 +446,8 @@
         return $c->view( $c->stash->{current_view} )
           if $c->stash->{current_view};
     }
-    return $c->view( $appclass->config->{default_view} )
-      if $appclass->config->{default_view};
-
+    return $c->view( $c->config->{default_view} )
+      if $c->config->{default_view};
     my( $comp, $rest ) = $c->_comp_search_prefixes( undef, qw/View V/);
 
     if( $rest ) {