Release commit for 1.001000
[p5sagit/Package-Variant.git] / t / 11dynamic-build.t
1 use strictures 1;
2 use Test::More;
3
4 BEGIN {
5   package TestVariable;
6   use Package::Variant;
7   sub make_variant {
8     my ($class, $target, @args) = @_;
9     install variant_values => sub { [@args] };
10   }
11 }
12
13 is_deeply(
14   Package::Variant
15     ->build_variant_of('TestVariable', 3..7)
16     ->variant_values,
17   [3..7],
18   'build_variant_of with scalar values',
19 );
20
21 done_testing;