X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FEngine%2FHTTP%2FRestarter.pm;h=bae57b18cac9443027dc27732c7bd2d983efbf47;hb=c72d2e2433960ba1d58f46af9f696a705b777836;hp=c2db06507245cdaecbe9662a67d5b187a236f306;hpb=2bab21f6e1abb1e23e7e922212188820e3ad073d;p=catagits%2FCatalyst-Runtime.git diff --git a/lib/Catalyst/Engine/HTTP/Restarter.pm b/lib/Catalyst/Engine/HTTP/Restarter.pm index c2db065..bae57b1 100644 --- a/lib/Catalyst/Engine/HTTP/Restarter.pm +++ b/lib/Catalyst/Engine/HTTP/Restarter.pm @@ -83,7 +83,10 @@ around run => sub { sub _make_components_mutable { my ($self, $class) = @_; - my @metas = map { find_meta($_) } ($class, map { blessed($_) } values %{ $class->components }); + my @metas = grep { defined($_) } + map { find_meta($_) } + ($class, map { blessed($_) } + values %{ $class->components }); foreach my $meta (@metas) { # Paranoia unneeded, all component metaclasses should have immutable