Commit | Line | Data |
---|---|---|
398fe5a2 | 1 | use strict; |
2 | use Test::More; | |
3 | use Module::Metadata; | |
4 | use lib "t/lib/0.2"; | |
5 | ||
6 | plan tests => 4; | |
7 | ||
8 | require Foo; | |
9 | is $Foo::VERSION, 0.2; | |
10 | ||
11 | my $meta = Module::Metadata->new_from_module("Foo", inc => [ "t/lib/0.1" ] ); | |
12 | is $meta->version, 0.1; | |
13 | ||
14 | is $Foo::VERSION, 0.2; | |
15 | ||
16 | ok eval "use Foo 0.2; 1"; | |
17 | ||
18 | ||
19 | ||
20 | ||
21 | ||
22 |