minor fixes

diff --git a/lib/Catalyst.pm b/lib/Catalyst.pm
index 7ca4f99..33c8e15 100644 (file)
--- a/lib/Catalyst.pm
+++ b/lib/Catalyst.pm
@@ -37,7 +37,7 @@ BEGIN { require 5.008004; }
 
 has 'context' => (
     isa       => 'Catalyst::Context',
-    is        => 'rw',
+    is        => 'ro',
     handles   => [
         qw/ action counter namespace request response stack stash state stats /,
     ],
@@ -70,6 +70,7 @@ __PACKAGE__->mk_classdata($_)
   engine_class context_class request_class response_class stats_class
   setup_finished/;
 
+__PACKAGE__->context_class('Catalyst::Context');
 __PACKAGE__->dispatcher_class('Catalyst::Dispatcher');
 __PACKAGE__->engine_class('Catalyst::Engine::CGI');
 __PACKAGE__->request_class('Catalyst::Request');
@@ -1885,8 +1886,7 @@ sub prepare {
     # into the application.
     $class->context_class( ref $class || $class ) unless $class->context_class;
 
-    my $context = Catalyst::Context->new();
-    my $c = $class->context_class->new({ context => $context });
+    my $c = $class->new({ context => $class->context_class->new() });
 
     # For on-demand data
     $c->request->_context($c);

diff --git a/lib/Catalyst/Context.pm b/lib/Catalyst/Context.pm
index 98a8e3e..7453124 100644 (file)
--- a/lib/Catalyst/Context.pm
+++ b/lib/Catalyst/Context.pm
@@ -2,8 +2,6 @@ package Catalyst::Context;
 
 use Moose;
 
-BEGIN { require 5.008004; }
-
 has action => (is => 'rw');
 has counter => (is => 'rw', default => sub { {} });
 has namespace => (is => 'rw');
@@ -16,17 +14,6 @@ has stash => (is => 'rw', default => sub { {} });
 has state => (is => 'rw', default => 0);
 has stats => (is => 'rw');
 
-# Remember to update this in Catalyst::Runtime as well!
-
-our $VERSION = '5.80013';
-
-{
-    my $dev_version = $VERSION =~ /_\d{2}$/;
-    *_IS_DEVELOPMENT_VERSION = sub () { $dev_version };
-}
-
-$VERSION = eval $VERSION;
-
 no Moose;
 
 __PACKAGE__->meta->make_immutable;