X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FCPANPLUS-Dist-Gentoo.git;a=blobdiff_plain;f=t%2F12-maps-version.t;h=ea53f9bf07160a0accf0a93ed6f45314e9207cbc;hp=80a4baae45dc9db912ff903544d67a3cb05c3d8b;hb=00e09b5e966914ebedb5c08927cf5a66af177171;hpb=0d54c05d27e53e16bc97eb47d63f11fc85e34f74 diff --git a/t/12-maps-version.t b/t/12-maps-version.t index 80a4baa..ea53f9b 100644 --- a/t/12-maps-version.t +++ b/t/12-maps-version.t @@ -3,7 +3,7 @@ use strict; use warnings; -use Test::More tests => 10 + 24; +use Test::More tests => 10; use CPANPLUS::Dist::Gentoo::Maps; @@ -19,37 +19,3 @@ is vc2g('1_.1'), '1_p1', "version_c2g('1_.1')"; is vc2g('1_.1._2'), '1_p1.2', "version_c2g('1_.1._2')"; is vc2g('1_.1_2'), '1_p1.2', "version_c2g('1_.1_2')"; is vc2g('1_.1_.2'), '1_p1.2', "version_c2g('1_.1_.2')"; - -*vgcmp = \&CPANPLUS::Dist::Gentoo::Maps::version_gcmp; - -eval { vgcmp('dongs', 1) }; -like $@, qr/Couldn't\s+parse\s+version\s+string/, "version_gcmp('dongs', 1)"; - -eval { vgcmp(1, 'dongs') }; -like $@, qr/Couldn't\s+parse\s+version\s+string/, "version_gcmp(1, 'dongs')"; - -is vgcmp(undef, 0), 0, 'version_gcmp(undef, 0)'; -is vgcmp(0, 0), 0, 'version_gcmp(0, 0)'; -is vgcmp(1, 0), 1, 'version_gcmp(1, 0)'; -is vgcmp(0, 1), -1, 'version_gcmp(0, 1)'; -is vgcmp(1, 1), 0, 'version_gcmp(1, 1)'; - -is vgcmp('1.0', 1), 0, "version_gcmp('1.0', 1)"; -is vgcmp('1.1', 1), 1, "version_gcmp('1.1', 1)"; -is vgcmp('1.1', '1.0'), 1, "version_gcmp('1.1', '1.0')"; -is vgcmp(1, '1.0'), 0, "version_gcmp(1, '1.0')"; -is vgcmp(1, '1.1'), -1, "version_gcmp(1, '1.1')"; -is vgcmp('1.0', '1.1'), -1, "version_gcmp('1.0', '1.1')"; - -is vgcmp('1.0_p0', '1.0_p0'), 0, "version_gcmp('1.0_p0', '1.0_p0')"; -is vgcmp('1.0_p0', '1.0_p1'), -1, "version_gcmp('1.0_p0', '1.0_p1')"; -is vgcmp('1.1_p0', '1.0_p1'), 1, "version_gcmp('1.1_p0', '1.0_p1')"; -is vgcmp('1.1_p0', '1.1_p0.1'), -1, "version_gcmp('1.1_p0', '1.1_p0.1')"; -is vgcmp('1.1_p0.1', '1.1_p0.1'), 0, "version_gcmp('1.1_p0.1', '1.1_p0.1')"; - -is vgcmp('1.2_p0-r0', '1.2_p0'), 0, "version_gcmp('1.2_p0-r0', '1.2_p0')"; -is vgcmp('1.2_p0-r1', '1.2_p0'), 1, "version_gcmp('1.2_p0-r1', '1.2_p0')"; -is vgcmp('1.2-r0', '1.2_p0'), 0, "version_gcmp('1.2-r0', '1.2_p0')"; -is vgcmp('1.2-r1', '1.2_p0'), 1, "version_gcmp('1.2-r1', '1.2_p0')"; -is vgcmp('1.2-r1', '1.2_p1'), -1, "version_gcmp('1.2-r1', '1.2_p1')"; -is vgcmp('1.2-r2', '1.2_p1'), -1, "version_gcmp('1.2-r2', '1.2_p1')";