X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=lib%2FCatalyst%2FEngine%2FHTTP%2FRestarter.pm;h=bae57b18cac9443027dc27732c7bd2d983efbf47;hp=c2db06507245cdaecbe9662a67d5b187a236f306;hb=4f03bb77eaf3b07fac86f455bf688c2b6f1d5273;hpb=88f165ea55501d97d784c776deee28549696fcda 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