X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FCPANPLUS-Dist-Gentoo.git;a=blobdiff_plain;f=t%2F13-maps-license.t;h=e3119dc01bef04f14c48af9f05bc96de2b0519c4;hp=0a19d001a0a2630540392dc94b9b02dc166c9c02;hb=71afb2b14bce73a68a56efd6c47af106c996232d;hpb=8059d98e61fddbdcfed701f6f63e4f309d6826f8 diff --git a/t/13-maps-license.t b/t/13-maps-license.t index 0a19d00..e3119dc 100644 --- a/t/13-maps-license.t +++ b/t/13-maps-license.t @@ -3,7 +3,7 @@ use strict; use warnings; -use Test::More tests => 4; +use Test::More tests => 6; use CPANPLUS::Dist::Gentoo::Maps; @@ -12,6 +12,8 @@ sub check_licenses { is_deeply \@licenses, $_[1], $_[2]; } +check_licenses [ ], [ ], 'empty'; +check_licenses [ undef ], [ ], 'undef'; check_licenses [ 'woo' ], [ ], 'nonexistent'; check_licenses [ 'perl' ], [ qw/Artistic GPL-2/ ], 'perl'; check_licenses [ qw/perl gpl2/ ], [ qw/Artistic GPL-2/ ], 'perl + gpl2';