X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2FAcme%2FCPANAuthors%2FYou%2Fre_using.pm;h=afaea0ffc2b2b3a62733b47334e1aea7ed11a5f5;hb=90da3cef117a899394556b36569e289b52f5f53e;hp=9fbe898e382b21e77200123809a0469ce13f481a;hpb=a7271956fb0e83fe6687b53c9e892bc5ae2a3214;p=perl%2Fmodules%2FAcme-CPANAuthors-You-re_using.git

diff --git a/lib/Acme/CPANAuthors/You/re_using.pm b/lib/Acme/CPANAuthors/You/re_using.pm
index 9fbe898..afaea0f 100644
--- a/lib/Acme/CPANAuthors/You/re_using.pm
+++ b/lib/Acme/CPANAuthors/You/re_using.pm
@@ -65,7 +65,10 @@ sub register {
  File::Find::find({
   wanted => sub {
    return unless /\.pm$/;
-   my $mod = Module::Metadata->new_from_file($_);
+   my $mod = do {
+    local $@;
+    eval { Module::Metadata->new_from_file($_) }
+   };
    return unless $mod;
    @modules{grep $_, $mod->packages_inside} = ();
   },
@@ -122,7 +125,7 @@ You can find documentation for this module with the perldoc command.
 
 =head1 COPYRIGHT & LICENSE
 
-Copyright 2009,2010,2011,2013 Vincent Pit, all rights reserved.
+Copyright 2009,2010,2011,2013,2015 Vincent Pit, all rights reserved.
 
 This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.