fixed test suite issues

barbie · May 12, 2013 · fbdef1e · fbdef1e
1 parent dc00507
commit fbdef1e
Show file tree

Hide file tree

Showing 6 changed files with 13 additions and 9 deletions.
diff --git a/Changes b/Changes
@@ -1,5 +1,9 @@
 Revision history for Perl module CPAN-Testers-Data-Generator.
 
+1.10    2013-05-12
+        - fixed skip test count.
+        - fixed cleanup of directory removal.
+
 1.09    2013-04-14
         - date clarification for lookups.
         - additional logging.

diff --git a/META.json b/META.json
@@ -1,6 +1,6 @@
 {
     "name": "CPAN-Testers-Data-Generator",
-    "version": "1.09",
+    "version": "1.10",
     "abstract": "CPAN Testers cpanstats Database Generator",
     "author": [
         "Barbie (BARBIE) <barbie@cpan.org>"
@@ -66,7 +66,7 @@
     "provides": {
         "CPAN::Testers::Data::Generator": {
             "file": "lib/CPAN/Testers/Data/Generator.pm",
-            "version": "1.09"
+            "version": "1.10"
         }
     },
     "no_index": {

diff --git a/META.yml b/META.yml
@@ -1,6 +1,6 @@
 --- #YAML:1.0
 name:                     CPAN-Testers-Data-Generator
-version:                  1.09
+version:                  1.10
 abstract:                 CPAN Testers cpanstats Database Generator
 author:
   - Barbie <barbie@cpan.org>
@@ -46,7 +46,7 @@ build_requires:
 provides:
   CPAN::Testers::Data::Generator:
     file:     lib/CPAN/Testers/Data/Generator.pm
-    version:  1.09
+    version:  1.10
 
 no_index:
   directory:

diff --git a/lib/CPAN/Testers/Data/Generator.pm b/lib/CPAN/Testers/Data/Generator.pm
@@ -4,7 +4,7 @@ use warnings;
 use strict;
 
 use vars qw($VERSION);
-$VERSION = '1.09';
+$VERSION = '1.10';
 
 #----------------------------------------------------------------------------
 # Library Modules

diff --git a/t/10internals.t b/t/10internals.t
@@ -51,7 +51,7 @@ my @test_meta_rows = (
 # TEST INTERNALS
 
 SKIP: {
-    skip "Test::Database required for DB testing", 21 unless(-f $config);
+    skip "Test::Database required for DB testing", 23 unless(-f $config);
 
     # prep test directory
     my $directory = './test';

diff --git a/t/89cleanup.t b/t/89cleanup.t
@@ -4,7 +4,7 @@ use strict;
 $|=1;
 
 use File::Path;
-use Test::More tests => 4;
+use Test::More tests => 2;
 
 eval "use Test::Database";
 my $notd = $@ ? 1 : 0;
@@ -19,10 +19,10 @@ unless($notd) {
 }
 
 for my $d ('t/_DBDIR','test') {
-    ok( rmtree( $d ), "removed '$d'" );
+    rmtree( $d ) if(-d $d);
     if($^O =~ /Win32/i) {
         ok(1);
     } else {
-        ok( ! -d $d,      "removed '$d' verified" );
+        ok( ! -d $d, "removed '$d' verified" );
     }
 }