extended test suite

barbie · Aug 23, 2014 · 7942733 · 7942733
1 parent e8edb7c
commit 7942733
Show file tree

Hide file tree

Showing 3 changed files with 18 additions and 1 deletion.
diff --git a/Changes b/Changes
@@ -4,6 +4,7 @@ Changes log for Data-Phrasebook-Loader-YAML
         - fixed license fields in META.json to be lists.
         - added repository link to META.yml.
         - added cpanminus to INSTALL.
+        - extended test suite.
 
 0.12    2012-10-07
         - fixed prerequisites in META files (thanks to D Thomas RT#79204).

diff --git a/t/94metatest.t b/t/94metatest.t
@@ -24,5 +24,13 @@ if($meta->{provides}) {
     for my $mod (keys %{$meta->{provides}}) {
         is($meta->{provides}{$mod}{version},$version,
             "META.yml entry [$mod] version matches");
+
+        eval "require $mod";
+        my $VERSION = '$' . $mod . '::VERSION';
+        my $v = eval "$VERSION";
+        is($meta->{provides}{$mod}{version},$v,
+            "META.json entry [$mod] version matches module version");
+
+        isnt($meta->{provides}{$mod}{version},0);
     }
 }
diff --git a/t/96metatest.t b/t/96metatest.t
@@ -23,6 +23,14 @@ is($meta->{version},$version,
 if($meta->{provides}) {
     for my $mod (keys %{$meta->{provides}}) {
         is($meta->{provides}{$mod}{version},$version,
-            "META.json entry [$mod] version matches");
+            "META.json entry [$mod] version matches distribution version");
+
+        eval "require $mod";
+        my $VERSION = '$' . $mod . '::VERSION';
+        my $v = eval "$VERSION";
+        is($meta->{provides}{$mod}{version},$v,
+            "META.json entry [$mod] version matches module version");
+
+        isnt($meta->{provides}{$mod}{version},0);
     }
 }