diff options
Diffstat (limited to '')
-rwxr-xr-x | cpan-graph.pl | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/cpan-graph.pl b/cpan-graph.pl index 797a0d5..c5de483 100755 --- a/cpan-graph.pl +++ b/cpan-graph.pl @@ -43,6 +43,8 @@ while ( my $dist = $dists->next ) { my $author = $sqlall->resultset( 'author' )->find( $dist->author ); my ($year, $month, $day) = $dist->released =~ /^(\d{4})-(\d{2})-(\d{2})/; + next if (!defined $year || !defined $month || !defined $day); + $map_package->update( { tests_success => $tests_success, author => $author->pauseid, |