X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=lib%2FCatalyst.pm;h=d23886763ad814d0d51a7a54e06b0fb138eb5a2c;hp=9a629fc71c3218d193fd0bf161767a279559cdad;hb=502619e59524272fc07491f9d2d6958304df3fa4;hpb=b5524568632c98c00e7f3a21e0c74b93fd5b8863 diff --git a/lib/Catalyst.pm b/lib/Catalyst.pm index 9a629fc..d238867 100644 --- a/lib/Catalyst.pm +++ b/lib/Catalyst.pm @@ -7,7 +7,7 @@ use Catalyst::Log; __PACKAGE__->mk_classdata($_) for qw/_config log/; -our $VERSION = '4.27'; +our $VERSION = '4.28'; our @ISA; =head1 NAME @@ -161,7 +161,8 @@ sub import { else { $caller->log->debug(qq/Loaded plugin "$plugin"/) if $caller->debug; - unshift @ISA, $plugin; + no strict 'refs'; + push @{"$caller\::ISA"}, $plugin; } } } @@ -171,7 +172,10 @@ sub import { if $ENV{CATALYST_ENGINE}; $engine->require; die qq/Couldn't load engine "$engine", "$@"/ if $@; - push @ISA, $engine; + { + no strict 'refs'; + push @{"$caller\::ISA"}, $engine; + } $caller->log->debug(qq/Loaded engine "$engine"/) if $caller->debug; } @@ -197,9 +201,9 @@ Sebastian Riedel, C =head1 THANK YOU -Andrew Ruthven, Christopher Hicks, Danijel Milicevic, David Naughton, -Gary Ashton Jones, Jesse Sheidlower, Johan Lindstrom, Marcus Ramberg, -Tatsuhiko Miyagawa and all the others who've helped. +Andrew Ruthven, Christian Hansen, Christopher Hicks, Danijel Milicevic, +David Naughton, Gary Ashton Jones, Jesse Sheidlower, Johan Lindstrom, +Marcus Ramberg, Tatsuhiko Miyagawa and all the others who've helped. =head1 LICENSE