add build_variant method on variable packages

[p5sagit/Package-Variant.git] / t / 01simple.t

diff --git a/t/01simple.t b/t/01simple.t
index 2a060cb..3d3813d 100644 (file)
--- a/t/01simple.t
+++ b/t/01simple.t
@@ -100,6 +100,13 @@ TestSingleImport(23);
 is_deeply [@imported], [qw( TestImportableA )],
   'scalar import works';
 
+@imported = ();
+
+TestSingleImport::->build_variant;
+
+is_deeply [@imported], [qw( TestImportableA )],
+  'build_variant works';
+
 like exception {
   Package::Variant->import(
     importing => \'foo', subs => [qw( foo )],