X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=lib%2FCatalyst%2FException.pm;h=7a59a57fc3f6a84941181f2e672971e57c0a98b8;hp=02610a472abfc9b90556f3b634a68e64dcfd2069;hb=e5ecd5bc38bac3e2fcfaf643ea2a4c6ab46d7e57;hpb=7fa2c9c1b85c98786655ad5169708d8dc84e8353 diff --git a/lib/Catalyst/Exception.pm b/lib/Catalyst/Exception.pm index 02610a4..7a59a57 100644 --- a/lib/Catalyst/Exception.pm +++ b/lib/Catalyst/Exception.pm @@ -60,6 +60,8 @@ it under the same terms as Perl itself. =cut +Catalyst::Exception::Base->meta->make_immutable; + package Catalyst::Exception; use Moose; @@ -69,4 +71,6 @@ BEGIN { extends($CATALYST_EXCEPTION_CLASS || 'Catalyst::Exception::Base'); } +Catalyst::Exception->meta->make_immutable; + 1;