diff --git a/MANIFEST b/MANIFEST index 9164693..36d4df8 100644 --- a/MANIFEST +++ b/MANIFEST @@ -19,4 +19,6 @@ t/noplan.t t/pod-cm.t t/pod.t t/search.t +t/snippets.t +t/strict.t t/unused.t diff --git a/bin/create_db.PL b/bin/create_db.PL index a2a9432..e50f0b4 100755 --- a/bin/create_db.PL +++ b/bin/create_db.PL @@ -83,10 +83,10 @@ $ua->conn_cache()->total_capacity(undef); my $page = 1; my @queue; -while(1) { +do { last if(!mlarchives($ua, $page)); $page++; -} +} while($page < 200); my $issue = 9; while(1) { diff --git a/t/noplan.t b/t/noplan.t index 3c96b95..2ceec99 100644 --- a/t/noplan.t +++ b/t/noplan.t @@ -5,13 +5,13 @@ use warnings; use Test::Most; -unless($ENV{RELEASE_TESTING}) { - plan( skip_all => "Author tests not required for installation" ); -} - -eval 'use Test::NoPlan qw / all_plans_ok /'; -if($@) { - plan skip_all => 'Test::NoPlan required for test verification'; +if($ENV{AUTHOR_TESTING}) { + eval 'use Test::NoPlan qw / all_plans_ok /'; + if($@) { + plan(skip_all => 'Test::NoPlan required for test verification'); + } else { + all_plans_ok(); + } } else { - all_plans_ok(); + plan(skip_all => 'Author tests not required for installation'); }