]> git.vpit.fr Git - perl/modules/CPANPLUS-Dist-Gentoo.git/blobdiff - t/12-maps-version.t
Update gentooisms
[perl/modules/CPANPLUS-Dist-Gentoo.git] / t / 12-maps-version.t
index 823e98c85988b730c23442273564adb56dd54bd1..8bb8c9d0d9002c412d6ca11e3a84f98a35ef57fa 100644 (file)
@@ -12,25 +12,25 @@ use CPANPLUS::Dist::Gentoo::Maps;
  goto &CPANPLUS::Dist::Gentoo::Maps::version_c2g
 };
 
-is vc2g('1'),       '1',      "version_c2g('1')";
-is vc2g('v1'),      '1',      "version_c2g('v1')";
-is vc2g('..1'),     '1',      "version_c2g('..1')";
-is vc2g('1.0'),     '1.0',    "version_c2g('1.0')";
-is vc2g('v1.0'),    '1.0',    "version_c2g('v1.0')";
-is vc2g('1._0'),    '1.0',    "version_c2g('1._0')";
-is vc2g('1_1'),     '1_p1',   "version_c2g('1_1')";
-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_p12',  "version_c2g('1_.1_2')";
-is vc2g('1_.1_.2'), '1_p12',  "version_c2g('1_.1_.2')";
-
-for my $test ([ '0.12' => '0.12' ], [ '0.1234' => '0.12.34' ]) {
+is vc2g('1'),       '1.0.0',      "version_c2g('1')";
+is vc2g('v1'),      '1',          "version_c2g('v1')";
+is vc2g('..1'),     '1.0.0',      "version_c2g('..1')";
+is vc2g('1.0'),     '1.0.0',      "version_c2g('1.0')";
+is vc2g('v1.0'),    '1.0',        "version_c2g('v1.0')";
+is vc2g('1._0'),    '1.0.0_rc',   "version_c2g('1._0')";
+is vc2g('1_1'),     '11.0.0_rc',  "version_c2g('1_1')";
+is vc2g('1_.1'),    '1.100.0_rc', "version_c2g('1_.1')";
+is vc2g('1_.1._2'), '1.1.2_rc',   "version_c2g('1_.1._2')";
+is vc2g('1_.1_2'),  '1.120.0_rc', "version_c2g('1_.1_2')";
+is vc2g('1_.1_.2'), '1.1.2_rc',   "version_c2g('1_.1_.2')";
+
+for my $test ([ '0.12' => '0.12' ], [ '0.1234' => '0.1234' ]) {
  my @dists = qw<
-  ExtUtils-CBuilder
-  ExtUtils-ParseXS
-  Module-Build
-  Time-HiRes
-  Time-Local
+  ExtUtils-Install
+  File-Path
+  I18N-LangTags
+  IO
+  Time-Piece
  >;
  for my $dist (@dists) {
   is vc2g($dist, $test->[0]), $test->[1], "'version_c2g('$dist', '$test->[0]')";