Accepting request 297343 from devel:languages:perl
- updated to 6.4 see /usr/share/doc/packages/perl-Date-Calc/CHANGES.txt - remove upstream Date-Calc-6.3.diff OBS-URL: https://build.opensuse.org/request/show/297343 OBS-URL: https://build.opensuse.org/package/show/openSUSE:Factory/perl-Date-Calc?expand=0&rev=24
This commit is contained in:
Stephan Kulow
Git OBS Bridge
@@ -1,635 +0,0 @@
|
||||
Index: Date-Calc-6.3/t/f027.t
|
||||
===================================================================
|
||||
--- Date-Calc-6.3.orig/t/f027.t
|
||||
+++ Date-Calc-6.3/t/f027.t
|
||||
@@ -43,107 +43,107 @@ if ((($year,$mm,$dd) = Decode_Date_US2("
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_US2("_1364_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_US2("_01364_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_US2("_001364_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_US2("_10364_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_US2("_010364_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_US2("_0010364_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_US2("_110364_")) &&
|
||||
-($year==1964) && ($mm==11) && ($dd==3))
|
||||
+($year==2064) && ($mm==11) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_US2("_0110364_")) &&
|
||||
-($year==1964) && ($mm==11) && ($dd==3))
|
||||
+($year==2064) && ($mm==11) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_US2("_00110364_")) &&
|
||||
-($year==1964) && ($mm==11) && ($dd==3))
|
||||
+($year==2064) && ($mm==11) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
-if ((($year,$mm,$dd) = Decode_Date_US2("_1031964_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_US2("_1032064_")) &&
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
-if ((($year,$mm,$dd) = Decode_Date_US2("_01031964_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_US2("_01032064_")) &&
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
-if ((($year,$mm,$dd) = Decode_Date_US2("_001031964_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_US2("_001032064_")) &&
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
-if ((($year,$mm,$dd) = Decode_Date_US2("_11031964_")) &&
|
||||
-($year==1964) && ($mm==11) && ($dd==3))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_US2("_11032064_")) &&
|
||||
+($year==2064) && ($mm==11) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
-if ((($year,$mm,$dd) = Decode_Date_US2("_011031964_")) &&
|
||||
-($year==1964) && ($mm==11) && ($dd==3))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_US2("_011032064_")) &&
|
||||
+($year==2064) && ($mm==11) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
-if ((($year,$mm,$dd) = Decode_Date_US2("_0011031964_")) &&
|
||||
-($year==1964) && ($mm==11) && ($dd==3))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_US2("_0011032064_")) &&
|
||||
+($year==2064) && ($mm==11) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_US2("_1_3_64_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
-if ((($year,$mm,$dd) = Decode_Date_US2("_1_3_1964_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_US2("_1_3_2064_")) &&
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_US2("_jan_3_64_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_US2("_Jan_3_64_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_US2("_jAN_3_64_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_US2("_January_3_64_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
@@ -151,68 +151,68 @@ unless (($year,$mm,$dd) = Decode_Date_US
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
-if ((($year,$mm,$dd) = Decode_Date_US2(" January 3rd, 1964 ")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_US2(" January 3rd, 2064 ")) &&
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_US2("_Jan364_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_US2("_Jan0364_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_US2("_Jan00364_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_US2("_Jan2264_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==22))
|
||||
+($year==2064) && ($mm==1) && ($dd==22))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_US2("_Jan02264_",0)) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==22))
|
||||
+($year==2064) && ($mm==1) && ($dd==22))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_US2("_Jan002264_",'')) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==22))
|
||||
+($year==2064) && ($mm==1) && ($dd==22))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
-if ((($year,$mm,$dd) = Decode_Date_US2("_ja31964_",1)) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_US2("_ja32064_",1)) &&
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
-if ((($year,$mm,$dd) = Decode_Date_US2("_ja031964_",2)) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_US2("_ja032064_",2)) &&
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
-if ((($year,$mm,$dd) = Decode_Date_US2("_ja0031964_",3)) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_US2("_ja0032064_",3)) &&
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
-if ((($year,$mm,$dd) = Decode_Date_US2("_ja221964_",undef)) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==22))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_US2("_ja222064_",undef)) &&
|
||||
+($year==2064) && ($mm==1) && ($dd==22))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
-if ((($year,$mm,$dd) = Decode_Date_US2("_ja0221964_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==22))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_US2("_ja0222064_")) &&
|
||||
+($year==2064) && ($mm==1) && ($dd==22))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
-if ((($year,$mm,$dd) = Decode_Date_US2("_ja00221964_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==22))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_US2("_ja00222064_")) &&
|
||||
+($year==2064) && ($mm==1) && ($dd==22))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
@@ -220,22 +220,22 @@ unless (($year,$mm,$dd) = Decode_Date_US
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
-unless (($year,$mm,$dd) = Decode_Date_US2("_ja331964_"))
|
||||
+unless (($year,$mm,$dd) = Decode_Date_US2("_ja332064_"))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_US2("x000001x000003x000064x")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_US2("_ja_000003x000064x")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
-if ((($year,$mm,$dd) = Decode_Date_US2("_Janeiro_3_dia_tres_de_janeiro_de_1964_mil_novecentos_sessenta_e_seis_",Decode_Language("Portug"))) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_US2("_Janeiro_3_dia_tres_de_janeiro_de_2064_mil_novecentos_sessenta_e_seis_",Decode_Language("Portug"))) &&
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
Index: Date-Calc-6.3/t/f028.t
|
||||
===================================================================
|
||||
--- Date-Calc-6.3.orig/t/f028.t
|
||||
+++ Date-Calc-6.3/t/f028.t
|
||||
@@ -43,132 +43,132 @@ if ((($year,$mm,$dd) = Decode_Date_EU2("
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_EU2("_3164_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_EU2("_03164_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_EU2("_003164_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_EU2("_30164_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_EU2("_030164_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_EU2("_0030164_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_EU2("_110364_")) &&
|
||||
-($year==1964) && ($mm==3) && ($dd==11))
|
||||
+($year==2064) && ($mm==3) && ($dd==11))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_EU2("_0110364_")) &&
|
||||
-($year==1964) && ($mm==3) && ($dd==11))
|
||||
+($year==2064) && ($mm==3) && ($dd==11))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_EU2("_00110364_")) &&
|
||||
-($year==1964) && ($mm==3) && ($dd==11))
|
||||
+($year==2064) && ($mm==3) && ($dd==11))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
-if ((($year,$mm,$dd) = Decode_Date_EU2("_3011964_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_EU2("_3012064_")) &&
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
-if ((($year,$mm,$dd) = Decode_Date_EU2("_03011964_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_EU2("_03012064_")) &&
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
-if ((($year,$mm,$dd) = Decode_Date_EU2("_003011964_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_EU2("_003012064_")) &&
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
-if ((($year,$mm,$dd) = Decode_Date_EU2("_11031964_")) &&
|
||||
-($year==1964) && ($mm==3) && ($dd==11))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_EU2("_11032064_")) &&
|
||||
+($year==2064) && ($mm==3) && ($dd==11))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
-if ((($year,$mm,$dd) = Decode_Date_EU2("_011031964_")) &&
|
||||
-($year==1964) && ($mm==3) && ($dd==11))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_EU2("_011032064_")) &&
|
||||
+($year==2064) && ($mm==3) && ($dd==11))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
-if ((($year,$mm,$dd) = Decode_Date_EU2("_0011031964_")) &&
|
||||
-($year==1964) && ($mm==3) && ($dd==11))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_EU2("_0011032064_")) &&
|
||||
+($year==2064) && ($mm==3) && ($dd==11))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_EU2("_3_1_64_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
-if ((($year,$mm,$dd) = Decode_Date_EU2("_3_1_1964_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_EU2("_3_1_2064_")) &&
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_EU2("_3_jan_64_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_EU2("_3_Jan_64_",0)) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_EU2("_3_jAN_64_",1)) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_EU2("_3-JAN-64_",2)) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
-if ((($year,$mm,$dd) = Decode_Date_EU2("_3-Jan-1964_",3)) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_EU2("_3-Jan-2064_",3)) &&
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
-if ((($year,$mm,$dd) = Decode_Date_EU2("_3-January-1964_",'')) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_EU2("_3-January-2064_",'')) &&
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_EU2("_000003-Jan-000064_",undef)) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
-if ((($year,$mm,$dd) = Decode_Date_EU2("_000003-Jan-001964_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_EU2("_000003-Jan-002064_")) &&
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_EU2("_3_ja_64_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
@@ -177,42 +177,42 @@ unless (($year,$mm,$dd) = Decode_Date_EU
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_EU2("_3ja64_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_EU2("_03ja64_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_EU2("_003ja64_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_EU2("_000003ja000064_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
-if ((($year,$mm,$dd) = Decode_Date_EU2("_3ja1964_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_EU2("_3ja2064_")) &&
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
-if ((($year,$mm,$dd) = Decode_Date_EU2("_03ja1964_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_EU2("_03ja2064_")) &&
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
-if ((($year,$mm,$dd) = Decode_Date_EU2("_003ja1964_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_EU2("_003ja2064_")) &&
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
-if ((($year,$mm,$dd) = Decode_Date_EU2("_000003ja001964_")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_EU2("_000003ja002064_")) &&
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
@@ -220,22 +220,22 @@ unless (($year,$mm,$dd) = Decode_Date_EU
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
-unless (($year,$mm,$dd) = Decode_Date_EU2("_33ja1964_"))
|
||||
+unless (($year,$mm,$dd) = Decode_Date_EU2("_33ja2064_"))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_EU2("x000003x000001x000064x")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_EU2("x000003_ja_000064x")) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
-if ((($year,$mm,$dd) = Decode_Date_EU2("_dia_tres_3_janeiro_1964_mil_novecentos_sessenta_e_seis_",Decode_Language("Portug"))) &&
|
||||
-($year==1964) && ($mm==1) && ($dd==3))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_EU2("_dia_tres_3_janeiro_2064_mil_novecentos_sessenta_e_seis_",Decode_Language("Portug"))) &&
|
||||
+($year==2064) && ($mm==1) && ($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
Index: Date-Calc-6.3/t/f016.t
|
||||
===================================================================
|
||||
--- Date-Calc-6.3.orig/t/f016.t
|
||||
+++ Date-Calc-6.3/t/f016.t
|
||||
@@ -17,51 +17,51 @@ print "1..25\n";
|
||||
|
||||
$n = 1;
|
||||
if ((($year,$mm,$dd) = Decode_Date_EU("3.1.64")) &&
|
||||
-($year==1964)&&($mm==1)&&($dd==3))
|
||||
+($year==2064)&&($mm==1)&&($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
if ((($year,$mm,$dd) = Decode_Date_EU("3 1 64")) &&
|
||||
-($year==1964)&&($mm==1)&&($dd==3))
|
||||
+($year==2064)&&($mm==1)&&($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
if ((($year,$mm,$dd) = Decode_Date_EU("03.01.64")) &&
|
||||
-($year==1964)&&($mm==1)&&($dd==3))
|
||||
+($year==2064)&&($mm==1)&&($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
if ((($year,$mm,$dd) = Decode_Date_EU("03/01/64")) &&
|
||||
-($year==1964)&&($mm==1)&&($dd==3))
|
||||
+($year==2064)&&($mm==1)&&($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
-if ((($year,$mm,$dd) = Decode_Date_EU("3. Ene 1964",4)) &&
|
||||
-($year==1964)&&($mm==1)&&($dd==3))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_EU("3. Ene 2064",4)) &&
|
||||
+($year==2064)&&($mm==1)&&($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
if ((($year,$mm,$dd) = Decode_Date_EU("Geburtstag: 3. Januar '64 in Backnang/W<>rttemberg",3)) &&
|
||||
-($year==1964)&&($mm==1)&&($dd==3))
|
||||
+($year==2064)&&($mm==1)&&($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
if ((($year,$mm,$dd) = Decode_Date_EU("03-Jan-64")) &&
|
||||
-($year==1964)&&($mm==1)&&($dd==3))
|
||||
+($year==2064)&&($mm==1)&&($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
-if ((($year,$mm,$dd) = Decode_Date_EU("3.Jan1964",6)) &&
|
||||
-($year==1964)&&($mm==1)&&($dd==3))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_EU("3.Jan2064",6)) &&
|
||||
+($year==2064)&&($mm==1)&&($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
if ((($year,$mm,$dd) = Decode_Date_EU("3Jan64",0)) &&
|
||||
-($year==1964)&&($mm==1)&&($dd==3))
|
||||
+($year==2064)&&($mm==1)&&($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
if ((($year,$mm,$dd) = Decode_Date_EU("030164")) &&
|
||||
-($year==1964)&&($mm==1)&&($dd==3))
|
||||
+($year==2064)&&($mm==1)&&($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
if ((($year,$mm,$dd) = Decode_Date_EU("3ja64")) &&
|
||||
-($year==1964)&&($mm==1)&&($dd==3))
|
||||
+($year==2064)&&($mm==1)&&($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
if ((($year,$mm,$dd) = Decode_Date_EU("3164")) &&
|
||||
-($year==1964)&&($mm==1)&&($dd==3))
|
||||
+($year==2064)&&($mm==1)&&($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
@@ -74,39 +74,39 @@ unless (($year,$mm,$dd) = Decode_Date_EU
|
||||
$n++;
|
||||
|
||||
if ((($year,$mm,$dd) = Decode_Date_US("1 3 64")) &&
|
||||
-($year==1964)&&($mm==1)&&($dd==3))
|
||||
+($year==2064)&&($mm==1)&&($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
if ((($year,$mm,$dd) = Decode_Date_US("01/03/64")) &&
|
||||
-($year==1964)&&($mm==1)&&($dd==3))
|
||||
+($year==2064)&&($mm==1)&&($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
if ((($year,$mm,$dd) = Decode_Date_US("Jan 3 '64")) &&
|
||||
-($year==1964)&&($mm==1)&&($dd==3))
|
||||
+($year==2064)&&($mm==1)&&($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
-if ((($year,$mm,$dd) = Decode_Date_US("Jan 3 1964")) &&
|
||||
-($year==1964)&&($mm==1)&&($dd==3))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_US("Jan 3 2064")) &&
|
||||
+($year==2064)&&($mm==1)&&($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
-if ((($year,$mm,$dd) = Decode_Date_US("===> January 3rd 1964 (birthday)")) &&
|
||||
-($year==1964)&&($mm==1)&&($dd==3))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_US("===> January 3rd 2064 (birthday)")) &&
|
||||
+($year==2064)&&($mm==1)&&($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
-if ((($year,$mm,$dd) = Decode_Date_US("Jan31964")) &&
|
||||
-($year==1964)&&($mm==1)&&($dd==3))
|
||||
+if ((($year,$mm,$dd) = Decode_Date_US("Jan32064")) &&
|
||||
+($year==2064)&&($mm==1)&&($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
if ((($year,$mm,$dd) = Decode_Date_US("Jan364")) &&
|
||||
-($year==1964)&&($mm==1)&&($dd==3))
|
||||
+($year==2064)&&($mm==1)&&($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
if ((($year,$mm,$dd) = Decode_Date_US("ja364")) &&
|
||||
-($year==1964)&&($mm==1)&&($dd==3))
|
||||
+($year==2064)&&($mm==1)&&($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
if ((($year,$mm,$dd) = Decode_Date_US("1364")) &&
|
||||
-($year==1964)&&($mm==1)&&($dd==3))
|
||||
+($year==2064)&&($mm==1)&&($dd==3))
|
||||
{print "ok $n\n";} else {print "not ok $n\n";}
|
||||
$n++;
|
||||
|
||||
@@ -1,3 +0,0 @@
|
||||
version https://git-lfs.github.com/spec/v1
|
||||
oid sha256:3eb66188af89abc65b71e9852808d5d6b4bea7a606c55f2ae52c229bfc5bdb93
|
||||
size 168967
|
||||
BIN
Date-Calc-6.4.tar.gz
(Stored with Git LFS)
Normal file
BIN
Date-Calc-6.4.tar.gz
(Stored with Git LFS)
Normal file
Binary file not shown.
20
cpanspec.yml
Normal file
20
cpanspec.yml
Normal file
@@ -0,0 +1,20 @@
|
||||
---
|
||||
description_paragraphs: 3
|
||||
#no_testing: broken upstream
|
||||
#sources:
|
||||
# - source1
|
||||
# - source2
|
||||
#patches:
|
||||
# foo.patch: -p1
|
||||
# bar.patch:
|
||||
#preamble: |-
|
||||
# BuildRequires: gcc-c++
|
||||
#post_prep: |-
|
||||
# hunspell=`pkg-config --libs hunspell | sed -e 's,-l,,; s, *,,g'`
|
||||
# sed -i -e "s,hunspell-X,$hunspell," t/00-prereq.t Makefile.PL
|
||||
#post_install: |-
|
||||
# sed on %{name}.files
|
||||
#license: SUSE-NonFree
|
||||
#skip_noarch: 1
|
||||
#custom_build: -
|
||||
#./Build build flags=%{?_smp_mflags} --myflag
|
||||
@@ -1,3 +1,10 @@
|
||||
-------------------------------------------------------------------
|
||||
Thu Apr 16 19:56:35 UTC 2015 - coolo@suse.com
|
||||
|
||||
- updated to 6.4
|
||||
see /usr/share/doc/packages/perl-Date-Calc/CHANGES.txt
|
||||
- remove upstream Date-Calc-6.3.diff
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Sun Jan 4 13:16:20 UTC 2015 - coolo@suse.com
|
||||
|
||||
|
||||
@@ -1,7 +1,7 @@
|
||||
#
|
||||
# spec file for package perl-Date-Calc
|
||||
#
|
||||
# Copyright (c) 2015 SUSE LINUX Products GmbH, Nuernberg, Germany.
|
||||
# Copyright (c) 2015 SUSE LINUX GmbH, Nuernberg, Germany.
|
||||
#
|
||||
# All modifications and additions to the file contributed by third parties
|
||||
# remain the property of their copyright owners, unless otherwise agreed
|
||||
@@ -17,81 +17,50 @@
|
||||
|
||||
|
||||
Name: perl-Date-Calc
|
||||
BuildRequires: perl(Bit::Vector) >= 7.1
|
||||
BuildRequires: perl(Carp::Clan) >= 6.04
|
||||
Requires: perl(Bit::Vector) >= 7.1
|
||||
Requires: perl(Carp::Clan) >= 6.04
|
||||
BuildRequires: perl-macros
|
||||
Version: 6.3
|
||||
Version: 6.4
|
||||
Release: 0
|
||||
Provides: DateCalc
|
||||
Provides: perl_dc
|
||||
Obsoletes: perl_dc
|
||||
Url: http://search.cpan.org/perldoc?Date::Calc
|
||||
Summary: Perl Date-Calc Module
|
||||
License: Artistic-1.0 or GPL-2.0+
|
||||
%define cpan_name Date-Calc
|
||||
Summary: Gregorian calendar date calculations
|
||||
License: Artistic-1.0 or GPL-1.0+
|
||||
Group: Development/Libraries/Perl
|
||||
Source: http://search.cpan.org/CPAN/authors/id/S/ST/STBEY/Date-Calc-%{version}.tar.gz
|
||||
Patch: Date-Calc-%{version}.diff
|
||||
Url: http://search.cpan.org/dist/Date-Calc/
|
||||
Source0: http://www.cpan.org/authors/id/S/ST/STBEY/%{cpan_name}-%{version}.tar.gz
|
||||
Source1: cpanspec.yml
|
||||
BuildArch: noarch
|
||||
BuildRoot: %{_tmppath}/%{name}-%{version}-build
|
||||
BuildRequires: perl
|
||||
BuildRequires: perl-macros
|
||||
BuildRequires: perl(Bit::Vector) >= 7.4
|
||||
BuildRequires: perl(Carp::Clan) >= 6.04
|
||||
Requires: perl(Bit::Vector) >= 7.4
|
||||
Requires: perl(Carp::Clan) >= 6.04
|
||||
Recommends: perl(Date::Calc::XS) >= 6.4
|
||||
%{perl_requires}
|
||||
|
||||
%description
|
||||
This package consists of a C library and a Perl module (which uses the
|
||||
C library, internally) for all kinds of date calculations based on the
|
||||
Gregorian calendar (the one used in all western countries today),
|
||||
thereby complying with all relevant norms and standards: ISO/R
|
||||
2015-1971, DIN 1355 and, to some extent, ISO 8601 (where applicable).
|
||||
* *
|
||||
|
||||
(See also http://www.engelschall.com/u/sb/download/Date-Calc/DIN1355/
|
||||
for a scan of part of the "DIN 1355" document (in German)).
|
||||
'use Date::Calc qw( Days_in_Year Days_in_Month ... );'
|
||||
|
||||
The module of course handles year numbers of 2000 and above correctly
|
||||
("Year 2000" or "Y2K" compliance) -- actually all year numbers from 1
|
||||
to the largest positive integer representable on your system (which is
|
||||
at least 32767) can be dealt with.
|
||||
|
||||
Note that this package EXTRAPOLATES the Gregorian calendar BACK until
|
||||
the year 1 A.D. -- even though the Gregorian calendar was only adopted
|
||||
in 1582 by most (not all) European countries, in obedience to the
|
||||
corresponding decree of catholic pope Gregor I in that year.
|
||||
|
||||
Some (mainly protestant) countries continued to use the Julian calendar
|
||||
(used until then) until as late as the beginning of the 20th century.
|
||||
|
||||
Finally, note that this package is not intended to do everything you
|
||||
could ever imagine automagically for you; it is rather intended to
|
||||
serve as a toolbox (in the best of UNIX spirit and traditions) which
|
||||
should, however, always get you where you want to go.
|
||||
* *
|
||||
|
||||
%prep
|
||||
%setup -n Date-Calc-%{version} -q
|
||||
%patch -p1
|
||||
%setup -q -n %{cpan_name}-%{version}
|
||||
|
||||
%build
|
||||
perl Makefile.PL OPTIMIZE="$RPM_OPT_FLAGS -Wall"
|
||||
make %{?_smp_mflags}
|
||||
%{__perl} Makefile.PL INSTALLDIRS=vendor
|
||||
%{__make} %{?_smp_mflags}
|
||||
|
||||
%check
|
||||
make test
|
||||
%{__make} test
|
||||
|
||||
%install
|
||||
make DESTDIR=$RPM_BUILD_ROOT install_vendor
|
||||
%perl_make_install
|
||||
%perl_process_packlist
|
||||
chmod -R u+w *.txt
|
||||
for i in `ls *.txt`; do mv $i `basename $i .txt`; done
|
||||
rm -rf tools/compile.bat
|
||||
rm -rf $RPM_BUILD_ROOT%{_mandir}/man3/Carp::*
|
||||
rm -rf $RPM_BUILD_ROOT%{perl_vendorarch}/Carp
|
||||
%perl_gen_filelist
|
||||
|
||||
%clean
|
||||
rm -rf $RPM_BUILD_ROOT
|
||||
|
||||
%files
|
||||
%defattr(-, root, root)
|
||||
%doc license README CREDITS CHANGES MANIFEST
|
||||
%doc %{_mandir}/man?/*
|
||||
%{perl_vendorarch}/auto/Date/
|
||||
%{perl_vendorlib}/Date/
|
||||
%files -f %{name}.files
|
||||
%defattr(-,root,root,755)
|
||||
%doc CHANGES.txt CREDITS.txt README.txt
|
||||
|
||||
%changelog
|
||||
|
||||
Reference in New Issue
Block a user