diff options
author | franck cuny <franck@lumberjaph.net> | 2009-04-06 16:53:56 +0200 |
---|---|---|
committer | franck cuny <franck@lumberjaph.net> | 2009-04-06 16:53:56 +0200 |
commit | 6d094f406f00d84aa74c01229eb58af2dcd879ad (patch) | |
tree | 9f8f8d7fc73555dd45e8ce5dfb5856237bda0394 | |
parent | add version, use only modules with an author and a valid date (diff) | |
download | cpan-graph-6d094f406f00d84aa74c01229eb58af2dcd879ad.tar.gz |
check date
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, |