X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fmetadata.t;fp=t%2Fmetadata.t;h=3ac9c8ee0cc4675edaf963a432319722a892e717;hb=c6809f4e42b65ce4a3740f48d0b98f02a2b5a4a5;hp=55d06c68d6672580b5869dc2c8b6eae71c9630a7;hpb=62849b9aac1248b26061ba3dfc9fc07162a4b9c6;p=p5sagit%2FModule-Metadata.git

diff --git a/t/metadata.t b/t/metadata.t
index 55d06c6..3ac9c8e 100644
--- a/t/metadata.t
+++ b/t/metadata.t
@@ -262,7 +262,7 @@ package Simple-Edward;
 );
 my %pkg_names = reverse @pkg_names;
 
-plan tests => 63 + (2 * keys( %modules )) + (2 * keys( %pkg_names ));
+plan tests => 64 + (2 * keys( %modules )) + (2 * keys( %pkg_names ));
 
 require_ok('Module::Metadata');
 
@@ -743,7 +743,11 @@ Simple Simon
     }
   };
 
-  is_deeply( $got_provides, $exp_provides, "provides()" )
+  is_deeply( $got_provides, $exp_provides, "provides(dir => ...)" )
+    or diag explain $got_provides;
+
+  $got_provides = Module::Metadata->provides(files => ['lib/Simple.pm'], version => 2);
+  is_deeply( $got_provides, $exp_provides, "provides(files => ...)" )
     or diag explain $got_provides;
 }
 
@@ -760,7 +764,7 @@ Simple Simon
     }
   };
 
-  is_deeply( $got_provides, $exp_provides, "provides()" )
+  is_deeply( $got_provides, $exp_provides, "provides(dir => ..., prefix => ...)" )
     or diag explain $got_provides;
 }
 }