X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FPackage-Variant.git;a=blobdiff_plain;f=t%2F01simple.t;h=e41d27f670f620e5956bf60fb32ff5a498334c79;hp=dac661c38c72c0ab6bca180d7b92ac1c2a54b8eb;hb=115c342b3d84b8dd078f7e3779358662927473fc;hpb=efaab2573dd1acde9c72d8ce02ba9e1ad6c6e6e6

diff --git a/t/01simple.t b/t/01simple.t
index dac661c..e41d27f 100644
--- a/t/01simple.t
+++ b/t/01simple.t
@@ -85,4 +85,16 @@ TestArrayImports(23);
 is_deeply [@imported], [qw( TestImportableA TestImportableB )],
   'multiple imports in the right order';
 
+like exception {
+  Package::Variant->import(
+    importing => \'foo', subs => [qw( foo )],
+  );
+}, qr/importing.+option.+hash.+array/i, 'invalid "importing" option';
+
+like exception {
+  Package::Variant->import(
+    importing => { foo => \'bar' }, subs => [qw( bar )],
+  );
+}, qr/import.+argument.+not.+array/i, 'invalid import argument list';
+
 done_testing;