summaryrefslogtreecommitdiff
path: root/dev-perl/Date-Pcalc
diff options
context:
space:
mode:
authorV3n3RiX <venerix@redcorelinux.org>2018-07-14 20:57:42 +0100
committerV3n3RiX <venerix@redcorelinux.org>2018-07-14 20:57:42 +0100
commit1798c4aeca70ac8d0a243684d6a798fbc65735f8 (patch)
treee48e19cb6fa03de18e1c63e1a93371b7ebc4eb56 /dev-perl/Date-Pcalc
parentd87262dd706fec50cd150aab3e93883b6337466d (diff)
gentoo resync : 14.07.2018
Diffstat (limited to 'dev-perl/Date-Pcalc')
-rw-r--r--dev-perl/Date-Pcalc/Date-Pcalc-6.100.0-r1.ebuild26
-rw-r--r--dev-perl/Date-Pcalc/Manifest6
-rw-r--r--dev-perl/Date-Pcalc/files/6.100.0_identifier_before_numeric_constant.patch16
-rw-r--r--dev-perl/Date-Pcalc/files/Date-Pcalc-6.100.0-datestamp-window-move.patch497
-rw-r--r--dev-perl/Date-Pcalc/files/Date-Pcalc-6.100.0-unescaped-left-brace-5.26.patch253
-rw-r--r--dev-perl/Date-Pcalc/metadata.xml16
6 files changed, 0 insertions, 814 deletions
diff --git a/dev-perl/Date-Pcalc/Date-Pcalc-6.100.0-r1.ebuild b/dev-perl/Date-Pcalc/Date-Pcalc-6.100.0-r1.ebuild
deleted file mode 100644
index b286459d8dc5..000000000000
--- a/dev-perl/Date-Pcalc/Date-Pcalc-6.100.0-r1.ebuild
+++ /dev/null
@@ -1,26 +0,0 @@
-# Copyright 1999-2017 Gentoo Foundation
-# Distributed under the terms of the GNU General Public License v2
-
-EAPI=5
-
-MODULE_AUTHOR=STBEY
-MODULE_VERSION=6.1
-inherit perl-module
-
-DESCRIPTION="Gregorian calendar date calculations"
-
-SLOT="0"
-KEYWORDS="~alpha amd64 ~arm64 ~hppa ~ia64 ~m68k ppc ~ppc64 ~s390 ~sh ~sparc x86"
-IUSE=""
-
-DEPEND=">=dev-perl/Bit-Vector-7
- >=dev-perl/Carp-Clan-5.3"
-RDEPEND="${DEPEND}"
-
-SRC_TEST="do"
-mydoc="ToDo"
-PATCHES=(
- "${FILESDIR}"/6.100.0_identifier_before_numeric_constant.patch
- "${FILESDIR}/${P}-unescaped-left-brace-5.26.patch"
- "${FILESDIR}/${P}-datestamp-window-move.patch"
-)
diff --git a/dev-perl/Date-Pcalc/Manifest b/dev-perl/Date-Pcalc/Manifest
deleted file mode 100644
index ae554f86fcdb..000000000000
--- a/dev-perl/Date-Pcalc/Manifest
+++ /dev/null
@@ -1,6 +0,0 @@
-AUX 6.100.0_identifier_before_numeric_constant.patch 426 BLAKE2B 11e7054c4992bb87c448011aa742fd26a8150be241dc18b54f8f6c70d22d6170a437fb99b249a892def11f89329d6f18c9a5365a332d5e7bff942fe118087255 SHA512 7233525dcef437e4c51608bcade9da3aa6623542b6955a6f74f7bf3877db158dad26080042139870cb61b6737e02ffbbb22302f7920e742b5346ab69fa76d7db
-AUX Date-Pcalc-6.100.0-datestamp-window-move.patch 17413 BLAKE2B 8c854bb9c92029e492301a73c52d96b27575de98a30aab15b5c392e9438302812eaeb8803dd1e22b6914e91533e1c6267657cd5da826b5e4974cc6188b164761 SHA512 a842d9176bd33335674de098b4a4197ec2cdc5b6900a76de3182875fb67b438a699931f8d304b2ed277110a6acec37cc22d63133b0b6501ea88be59763d8588b
-AUX Date-Pcalc-6.100.0-unescaped-left-brace-5.26.patch 10615 BLAKE2B b5d3b3d3ea032f7b2f4c188e9b58b4e77916c73e2992e5eee41b106557a913a18de73560432ed3f22f2ea26be5d6ef24eafec172ab5cad2154416f22d05d4574 SHA512 1f4f4a826d5657f86ce31301b655f54951f307a08f9d01d5c49a868946c920b22ce5c144a2419aefef0a028bd7de59b29c723a3f162111326d1e3256a49f280a
-DIST Date-Pcalc-6.1.tar.gz 216790 BLAKE2B 72029df7ed1169b9a0e0ee81b1b70be20d5bfb1366abe8bf1863bd7c7e17b7fcbecb565a301642c8ecb641a18fa9bc8c16cbf38137c22b2e80c784ee8e6f642f SHA512 3f234e505f068e068608e76f5963f85172c1b04b5770d24d33bff704b2a50f1e4f222cfdf2cc5a992e618078f0bf018838278db2cd00e8037bdb2482eb0907c2
-EBUILD Date-Pcalc-6.100.0-r1.ebuild 610 BLAKE2B b98454ef6e4c56e65debe82b32493219f700f962b07a70844504f523759725383dfa03fbd8fab654a2620d204577e71e41799a650238491be743d0439359636a SHA512 86527c37f22a9bda2b8b007d01db6c65d5175232cf922792fb8a70bc362088ece8c622e1e56c00437943abaebf2acdac375165cf9898392b1d8fc4935641cbbe
-MISC metadata.xml 660 BLAKE2B 4feb7b8dcfc7b4221308288e41b75c4de3f2dac8b2ffe2a739494df3f1bf590e04f351ca16521b6e82056ccee568e7cccb1a0bf56560a0d9860a0db00f52988c SHA512 b497cfac14d6a72abf1268834731fdb778eb83a760c49d855910c68c320eaad6ff39cbc03a629f63774b2e6038f00117ca9fb2503622080b2af978195e414ab4
diff --git a/dev-perl/Date-Pcalc/files/6.100.0_identifier_before_numeric_constant.patch b/dev-perl/Date-Pcalc/files/6.100.0_identifier_before_numeric_constant.patch
deleted file mode 100644
index e475ea25c2cc..000000000000
--- a/dev-perl/Date-Pcalc/files/6.100.0_identifier_before_numeric_constant.patch
+++ /dev/null
@@ -1,16 +0,0 @@
-Bug: https://rt.cpan.org/Public/Bug/Display.html?id=76442
-Gentoo-Bug: https://bugs.gentoo.org/420177
---- a/src/C_XS/ToolBox.h
-+++ b/src/C_XS/ToolBox.h
-@@ -93,7 +93,10 @@
- #elif PERL_DARWIN
- #define boolean bool
- #else
-- typedef enum { false = FALSE, true = TRUE } boolean;
-+ typedef int boolean;
-+ #ifndef I_STDBOOL
-+ enum { false, true };
-+ #endif
- #endif
- #endif
-
diff --git a/dev-perl/Date-Pcalc/files/Date-Pcalc-6.100.0-datestamp-window-move.patch b/dev-perl/Date-Pcalc/files/Date-Pcalc-6.100.0-datestamp-window-move.patch
deleted file mode 100644
index 5a940cdc0fc0..000000000000
--- a/dev-perl/Date-Pcalc/files/Date-Pcalc-6.100.0-datestamp-window-move.patch
+++ /dev/null
@@ -1,497 +0,0 @@
-From fe3f15ea4afba52a5508ef6ad17c4207db79c9e4 Mon Sep 17 00:00:00 2001
-From: Kent Fredric <kentnl@gentoo.org>
-Date: Sat, 7 Oct 2017 01:38:06 +1300
-Subject: Defend Decode_Date_EU/US against year being warped due to window move
-
-These functions are defined to be floating relative to the current year
-based on the result of the moving window function where the full year
-is itself, unclear.
-
-This prevents the tests failing spuriously due to the calendar rolling
-over.
-
-Bug: https://rt.cpan.org/Ticket/Display.html?id=114375
----
- t/f016.t | 34 +++++++++++++++++-----------------
- t/f027.t | 52 ++++++++++++++++++++++++++--------------------------
- t/f028.t | 52 ++++++++++++++++++++++++++--------------------------
- 3 files changed, 69 insertions(+), 69 deletions(-)
-
-diff --git a/t/f016.t b/t/f016.t
-index 98069a4..3228dea 100644
---- a/t/f016.t
-+++ b/t/f016.t
-@@ -4,7 +4,7 @@ BEGIN { eval { require bytes; }; }
- use strict;
- no strict "vars";
-
--use Date::Pcalc qw( Decode_Date_EU Decode_Date_US );
-+use Date::Pcalc qw( Decode_Date_EU Decode_Date_US Moving_Window);
-
- # ======================================================================
- # ($year,$mm,$dd) = Decode_Date_EU($buffer);
-@@ -15,19 +15,19 @@ print "1..25\n";
-
- $n = 1;
- if ((($year,$mm,$dd) = Decode_Date_EU("3.1.64")) &&
--($year==1964)&&($mm==1)&&($dd==3))
-+($year==Moving_Window(64))&&($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==Moving_Window(64))&&($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==Moving_Window(64))&&($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==Moving_Window(64))&&($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)) &&
-@@ -35,11 +35,11 @@ if ((($year,$mm,$dd) = Decode_Date_EU("3. Ene 1964",4)) &&
- {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==Moving_Window(64))&&($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==Moving_Window(64))&&($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)) &&
-@@ -47,19 +47,19 @@ if ((($year,$mm,$dd) = Decode_Date_EU("3.Jan1964",6)) &&
- {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==Moving_Window(64))&&($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==Moving_Window(64))&&($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==Moving_Window(64))&&($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==Moving_Window(64))&&($mm==1)&&($dd==3))
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -72,15 +72,15 @@ unless (($year,$mm,$dd) = Decode_Date_EU("29.2.1995"))
- $n++;
-
- if ((($year,$mm,$dd) = Decode_Date_US("1 3 64")) &&
--($year==1964)&&($mm==1)&&($dd==3))
-+($year==Moving_Window(64))&&($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==Moving_Window(64))&&($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==Moving_Window(64))&&($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")) &&
-@@ -96,15 +96,15 @@ if ((($year,$mm,$dd) = Decode_Date_US("Jan31964")) &&
- {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==Moving_Window(64))&&($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==Moving_Window(64))&&($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==Moving_Window(64))&&($mm==1)&&($dd==3))
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-diff --git a/t/f027.t b/t/f027.t
-index 3070fd7..719e87d 100644
---- a/t/f027.t
-+++ b/t/f027.t
-@@ -4,7 +4,7 @@ BEGIN { eval { require bytes; }; }
- use strict;
- no strict "vars";
-
--use Date::Pcalc qw( Decode_Date_US2 Language Decode_Language );
-+use Date::Pcalc qw( Decode_Date_US2 Language Decode_Language Moving_Window );
-
- # ======================================================================
- # ($year,$mm,$dd) = Decode_Date_US2($date);
-@@ -26,62 +26,62 @@ unless (($year,$mm,$dd) = Decode_Date_US2("_13_"))
- $n++;
-
- if ((($year,$mm,$dd) = Decode_Date_US2("_134_")) &&
--($year==2004) && ($mm==1) && ($dd==3))
-+($year==Moving_Window(4)) && ($mm==1) && ($dd==3))
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
- if ((($year,$mm,$dd) = Decode_Date_US2("_0134_")) &&
--($year==2004) && ($mm==1) && ($dd==3))
-+($year==Moving_Window(4)) && ($mm==1) && ($dd==3))
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
- if ((($year,$mm,$dd) = Decode_Date_US2("_00134_")) &&
--($year==2004) && ($mm==1) && ($dd==3))
-+($year==Moving_Window(4)) && ($mm==1) && ($dd==3))
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
- if ((($year,$mm,$dd) = Decode_Date_US2("_1364_")) &&
--($year==1964) && ($mm==1) && ($dd==3))
-+($year==Moving_Window(64)) && ($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==Moving_Window(64)) && ($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==Moving_Window(64)) && ($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==Moving_Window(64)) && ($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==Moving_Window(64)) && ($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==Moving_Window(64)) && ($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==Moving_Window(64)) && ($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==Moving_Window(64)) && ($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==Moving_Window(64)) && ($mm==11) && ($dd==3))
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -116,7 +116,7 @@ if ((($year,$mm,$dd) = Decode_Date_US2("_0011031964_")) &&
- $n++;
-
- if ((($year,$mm,$dd) = Decode_Date_US2("_1_3_64_")) &&
--($year==1964) && ($mm==1) && ($dd==3))
-+($year==Moving_Window(64)) && ($mm==1) && ($dd==3))
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -126,22 +126,22 @@ if ((($year,$mm,$dd) = Decode_Date_US2("_1_3_1964_")) &&
- $n++;
-
- if ((($year,$mm,$dd) = Decode_Date_US2("_jan_3_64_")) &&
--($year==1964) && ($mm==1) && ($dd==3))
-+($year==Moving_Window(64)) && ($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==Moving_Window(64)) && ($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==Moving_Window(64)) && ($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==Moving_Window(64)) && ($mm==1) && ($dd==3))
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -155,32 +155,32 @@ if ((($year,$mm,$dd) = Decode_Date_US2(" January 3rd, 1964 ")) &&
- $n++;
-
- if ((($year,$mm,$dd) = Decode_Date_US2("_Jan364_")) &&
--($year==1964) && ($mm==1) && ($dd==3))
-+($year==Moving_Window(64)) && ($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==Moving_Window(64)) && ($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==Moving_Window(64)) && ($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==Moving_Window(64)) && ($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==Moving_Window(64)) && ($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==Moving_Window(64)) && ($mm==1) && ($dd==22))
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -223,12 +223,12 @@ unless (($year,$mm,$dd) = Decode_Date_US2("_ja331964_"))
- $n++;
-
- if ((($year,$mm,$dd) = Decode_Date_US2("x000001x000003x000064x")) &&
--($year==1964) && ($mm==1) && ($dd==3))
-+($year==Moving_Window(64)) && ($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==Moving_Window(64)) && ($mm==1) && ($dd==3))
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-diff --git a/t/f028.t b/t/f028.t
-index 8c98c51..6c8f396 100644
---- a/t/f028.t
-+++ b/t/f028.t
-@@ -4,7 +4,7 @@ BEGIN { eval { require bytes; }; }
- use strict;
- no strict "vars";
-
--use Date::Pcalc qw( Decode_Date_EU2 Language Decode_Language );
-+use Date::Pcalc qw( Decode_Date_EU2 Language Decode_Language Moving_Window );
-
- # ======================================================================
- # ($year,$mm,$dd) = Decode_Date_EU2($date);
-@@ -26,62 +26,62 @@ unless (($year,$mm,$dd) = Decode_Date_EU2("_31_"))
- $n++;
-
- if ((($year,$mm,$dd) = Decode_Date_EU2("_314_")) &&
--($year==2004) && ($mm==1) && ($dd==3))
-+($year==Moving_Window(4)) && ($mm==1) && ($dd==3))
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
- if ((($year,$mm,$dd) = Decode_Date_EU2("_0314_")) &&
--($year==2004) && ($mm==1) && ($dd==3))
-+($year==Moving_Window(4)) && ($mm==1) && ($dd==3))
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
- if ((($year,$mm,$dd) = Decode_Date_EU2("_00314_")) &&
--($year==2004) && ($mm==1) && ($dd==3))
-+($year==Moving_Window(4)) && ($mm==1) && ($dd==3))
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
- if ((($year,$mm,$dd) = Decode_Date_EU2("_3164_")) &&
--($year==1964) && ($mm==1) && ($dd==3))
-+($year==Moving_Window(64)) && ($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==Moving_Window(64)) && ($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==Moving_Window(64)) && ($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==Moving_Window(64)) && ($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==Moving_Window(64)) && ($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==Moving_Window(64)) && ($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==Moving_Window(64)) && ($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==Moving_Window(64)) && ($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==Moving_Window(64)) && ($mm==3) && ($dd==11))
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -116,7 +116,7 @@ if ((($year,$mm,$dd) = Decode_Date_EU2("_0011031964_")) &&
- $n++;
-
- if ((($year,$mm,$dd) = Decode_Date_EU2("_3_1_64_")) &&
--($year==1964) && ($mm==1) && ($dd==3))
-+($year==Moving_Window(64)) && ($mm==1) && ($dd==3))
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -126,22 +126,22 @@ if ((($year,$mm,$dd) = Decode_Date_EU2("_3_1_1964_")) &&
- $n++;
-
- if ((($year,$mm,$dd) = Decode_Date_EU2("_3_jan_64_")) &&
--($year==1964) && ($mm==1) && ($dd==3))
-+($year==Moving_Window(64)) && ($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==Moving_Window(64)) && ($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==Moving_Window(64)) && ($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==Moving_Window(64)) && ($mm==1) && ($dd==3))
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -156,7 +156,7 @@ if ((($year,$mm,$dd) = Decode_Date_EU2("_3-January-1964_",'')) &&
- $n++;
-
- if ((($year,$mm,$dd) = Decode_Date_EU2("_000003-Jan-000064_",undef)) &&
--($year==1964) && ($mm==1) && ($dd==3))
-+($year==Moving_Window(64)) && ($mm==1) && ($dd==3))
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -166,7 +166,7 @@ if ((($year,$mm,$dd) = Decode_Date_EU2("_000003-Jan-001964_")) &&
- $n++;
-
- if ((($year,$mm,$dd) = Decode_Date_EU2("_3_ja_64_")) &&
--($year==1964) && ($mm==1) && ($dd==3))
-+($year==Moving_Window(64)) && ($mm==1) && ($dd==3))
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -175,22 +175,22 @@ unless (($year,$mm,$dd) = Decode_Date_EU2("_3_j_64_"))
- $n++;
-
- if ((($year,$mm,$dd) = Decode_Date_EU2("_3ja64_")) &&
--($year==1964) && ($mm==1) && ($dd==3))
-+($year==Moving_Window(64)) && ($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==Moving_Window(64)) && ($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==Moving_Window(64)) && ($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==Moving_Window(64)) && ($mm==1) && ($dd==3))
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -223,12 +223,12 @@ unless (($year,$mm,$dd) = Decode_Date_EU2("_33ja1964_"))
- $n++;
-
- if ((($year,$mm,$dd) = Decode_Date_EU2("x000003x000001x000064x")) &&
--($year==1964) && ($mm==1) && ($dd==3))
-+($year==Moving_Window(64)) && ($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==Moving_Window(64)) && ($mm==1) && ($dd==3))
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
---
-2.14.1
-
diff --git a/dev-perl/Date-Pcalc/files/Date-Pcalc-6.100.0-unescaped-left-brace-5.26.patch b/dev-perl/Date-Pcalc/files/Date-Pcalc-6.100.0-unescaped-left-brace-5.26.patch
deleted file mode 100644
index b41cf9ad881e..000000000000
--- a/dev-perl/Date-Pcalc/files/Date-Pcalc-6.100.0-unescaped-left-brace-5.26.patch
+++ /dev/null
@@ -1,253 +0,0 @@
-From 20d1609037ec88f07d12df41fd5e65efd1f64c1f Mon Sep 17 00:00:00 2001
-From: gregor herrmann <gregoa@debian.org>
-Date: Sun, 21 May 2017 21:53:14 +1200
-Subject: Fix "unsecaped left brace" issue fatal in Perl 5.26
-
-Bug: https://rt.cpan.org/Public/Bug/Display.html?id=115100
-Bug: https://bugs.debian.org/826459
-Bug: https://bugs.gentoo.org/615580
----
- t/f035.t | 52 ++++++++++++++++++++++++++--------------------------
- 1 file changed, 26 insertions(+), 26 deletions(-)
-
-diff --git a/t/f035.t b/t/f035.t
-index a7e4a9e..9c625b9 100644
---- a/t/f035.t
-+++ b/t/f035.t
-@@ -106,7 +106,7 @@ $n++;
-
- eval { &{*{$main::{'confess'}}}("CONFESSing"); };
-
--if ($@ =~ /\bCONFESSing at .+\n.*\b(?:eval {\.\.\.}|require 0) called at\b/)
-+if ($@ =~ /\bCONFESSing at .+\n.*\b(?:eval \{\.\.\.}|require 0) called at\b/)
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -118,7 +118,7 @@ $n++;
-
- eval { local $SIG{'__WARN__'} = sub { die $_[0]; }; &{*{$main::{'cluck'}}}("CLUCKing"); };
-
--if ($@ =~ /\bCLUCKing at .+\n.*\b(?:eval {\.\.\.}|require 0) called at\b/)
-+if ($@ =~ /\bCLUCKing at .+\n.*\b(?:eval \{\.\.\.}|require 0) called at\b/)
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -130,7 +130,7 @@ $n++;
-
- eval { Carp::Clan::confess("confessING"); };
-
--if ($@ =~ /\bconfessING at .+\n.*\b(?:eval {\.\.\.}|require 0) called at\b/)
-+if ($@ =~ /\bconfessING at .+\n.*\b(?:eval \{\.\.\.}|require 0) called at\b/)
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -142,7 +142,7 @@ $n++;
-
- eval { local $SIG{'__WARN__'} = sub { die $_[0]; }; Carp::Clan::cluck("cluckING"); };
-
--if ($@ =~ /\bcluckING at .+\n.*\b(?:eval {\.\.\.}|require 0) called at\b/)
-+if ($@ =~ /\bcluckING at .+\n.*\b(?:eval \{\.\.\.}|require 0) called at\b/)
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -165,7 +165,7 @@ if ($@ =~ /\bCoNfEsSiNg\ at\ .+\n
- .*\bC::c\(2,\ 'CoNfEsSiNg'\)\ called\ at\ .+\n
- .*\bB::b\(2,\ 'CoNfEsSiNg'\)\ called\ at\ .+\n
- .*\bA::a\(2,\ 'CoNfEsSiNg'\)\ called\ at\ .+\n
-- .*\b(?:eval\ {\.\.\.}|require\ 0)\ called\ at\ /x)
-+ .*\b(?:eval\ \{\.\.\.}|require\ 0)\ called\ at\ /x)
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -184,7 +184,7 @@ if ($@ =~ /\bClUcKiNg\ at\ .+\n
- .*\bC::c\(4,\ 'ClUcKiNg'\)\ called\ at\ .+\n
- .*\bB::b\(4,\ 'ClUcKiNg'\)\ called\ at\ .+\n
- .*\bA::a\(4,\ 'ClUcKiNg'\)\ called\ at\ .+\n
-- .*\b(?:eval\ {\.\.\.}|require\ 0)\ called\ at\ /x)
-+ .*\b(?:eval\ \{\.\.\.}|require\ 0)\ called\ at\ /x)
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -207,7 +207,7 @@ if ($@ =~ /\bCoNfEsSiNg\ at\ .+\n
- .*\bC::c\(2,\ 'CoNfEsSiNg'\)\ called\ at\ .+\n
- .*\bB::b\(2,\ 'CoNfEsSiNg'\)\ called\ at\ .+\n
- .*\bA::a\(2,\ 'CoNfEsSiNg'\)\ called\ at\ .+\n
-- .*\b(?:eval\ {\.\.\.}|require\ 0)\ called\ at\ /x)
-+ .*\b(?:eval\ \{\.\.\.}|require\ 0)\ called\ at\ /x)
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -226,7 +226,7 @@ if ($@ =~ /\bClUcKiNg\ at\ .+\n
- .*\bC::c\(4,\ 'ClUcKiNg'\)\ called\ at\ .+\n
- .*\bB::b\(4,\ 'ClUcKiNg'\)\ called\ at\ .+\n
- .*\bA::a\(4,\ 'ClUcKiNg'\)\ called\ at\ .+\n
-- .*\b(?:eval\ {\.\.\.}|require\ 0)\ called\ at\ /x)
-+ .*\b(?:eval\ \{\.\.\.}|require\ 0)\ called\ at\ /x)
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -249,7 +249,7 @@ if ($@ =~ /\bCoNfEsSiNg\ at\ .+\n
- .*\bC::c\(2,\ 'CoNfEsSiNg'\)\ called\ at\ .+\n
- .*\bB::b\(2,\ 'CoNfEsSiNg'\)\ called\ at\ .+\n
- .*\bA::a\(2,\ 'CoNfEsSiNg'\)\ called\ at\ .+\n
-- .*\b(?:eval\ {\.\.\.}|require\ 0)\ called\ at\ /x)
-+ .*\b(?:eval\ \{\.\.\.}|require\ 0)\ called\ at\ /x)
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -268,7 +268,7 @@ if ($@ =~ /\bClUcKiNg\ at\ .+\n
- .*\bC::c\(4,\ 'ClUcKiNg'\)\ called\ at\ .+\n
- .*\bB::b\(4,\ 'ClUcKiNg'\)\ called\ at\ .+\n
- .*\bA::a\(4,\ 'ClUcKiNg'\)\ called\ at\ .+\n
-- .*\b(?:eval\ {\.\.\.}|require\ 0)\ called\ at\ /x)
-+ .*\b(?:eval\ \{\.\.\.}|require\ 0)\ called\ at\ /x)
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -291,7 +291,7 @@ if ($@ =~ /\bCoNfEsSiNg\ at\ .+\n
- .*\bC::c\(2,\ 'CoNfEsSiNg'\)\ called\ at\ .+\n
- .*\bB::b\(2,\ 'CoNfEsSiNg'\)\ called\ at\ .+\n
- .*\bA::a\(2,\ 'CoNfEsSiNg'\)\ called\ at\ .+\n
-- .*\b(?:eval\ {\.\.\.}|require\ 0)\ called\ at\ /x)
-+ .*\b(?:eval\ \{\.\.\.}|require\ 0)\ called\ at\ /x)
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -310,7 +310,7 @@ if ($@ =~ /\bClUcKiNg\ at\ .+\n
- .*\bC::c\(4,\ 'ClUcKiNg'\)\ called\ at\ .+\n
- .*\bB::b\(4,\ 'ClUcKiNg'\)\ called\ at\ .+\n
- .*\bA::a\(4,\ 'ClUcKiNg'\)\ called\ at\ .+\n
-- .*\b(?:eval\ {\.\.\.}|require\ 0)\ called\ at\ /x)
-+ .*\b(?:eval\ \{\.\.\.}|require\ 0)\ called\ at\ /x)
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -333,7 +333,7 @@ if ($@ =~ /\bCoNfEsSiNg\ at\ .+\n
- .*\bC::c\(2,\ 'CoNfEsSiNg'\)\ called\ at\ .+\n
- .*\bB::b\(2,\ 'CoNfEsSiNg'\)\ called\ at\ .+\n
- .*\bA::a\(2,\ 'CoNfEsSiNg'\)\ called\ at\ .+\n
-- .*\b(?:eval\ {\.\.\.}|require\ 0)\ called\ at\ /x)
-+ .*\b(?:eval\ \{\.\.\.}|require\ 0)\ called\ at\ /x)
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -352,7 +352,7 @@ if ($@ =~ /\bClUcKiNg\ at\ .+\n
- .*\bC::c\(4,\ 'ClUcKiNg'\)\ called\ at\ .+\n
- .*\bB::b\(4,\ 'ClUcKiNg'\)\ called\ at\ .+\n
- .*\bA::a\(4,\ 'ClUcKiNg'\)\ called\ at\ .+\n
-- .*\b(?:eval\ {\.\.\.}|require\ 0)\ called\ at\ /x)
-+ .*\b(?:eval\ \{\.\.\.}|require\ 0)\ called\ at\ /x)
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -375,7 +375,7 @@ if ($@ =~ /\bCoNfEsSiNg\ at\ .+\n
- .*\bC::c\(2,\ 'CoNfEsSiNg'\)\ called\ at\ .+\n
- .*\bB::b\(2,\ 'CoNfEsSiNg'\)\ called\ at\ .+\n
- .*\bA::a\(2,\ 'CoNfEsSiNg'\)\ called\ at\ .+\n
-- .*\b(?:eval\ {\.\.\.}|require\ 0)\ called\ at\ /x)
-+ .*\b(?:eval\ \{\.\.\.}|require\ 0)\ called\ at\ /x)
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -394,7 +394,7 @@ if ($@ =~ /\bClUcKiNg\ at\ .+\n
- .*\bC::c\(4,\ 'ClUcKiNg'\)\ called\ at\ .+\n
- .*\bB::b\(4,\ 'ClUcKiNg'\)\ called\ at\ .+\n
- .*\bA::a\(4,\ 'ClUcKiNg'\)\ called\ at\ .+\n
-- .*\b(?:eval\ {\.\.\.}|require\ 0)\ called\ at\ /x)
-+ .*\b(?:eval\ \{\.\.\.}|require\ 0)\ called\ at\ /x)
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -417,7 +417,7 @@ if ($@ =~ /\bCoNfEsSiNg\ at\ .+\n
- .*\bC::c\(2,\ 'CoNfEsSiNg'\)\ called\ at\ .+\n
- .*\bB::b\(2,\ 'CoNfEsSiNg'\)\ called\ at\ .+\n
- .*\bA::a\(2,\ 'CoNfEsSiNg'\)\ called\ at\ .+\n
-- .*\b(?:eval\ {\.\.\.}|require\ 0)\ called\ at\ /x)
-+ .*\b(?:eval\ \{\.\.\.}|require\ 0)\ called\ at\ /x)
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -436,7 +436,7 @@ if ($@ =~ /\bClUcKiNg\ at\ .+\n
- .*\bC::c\(4,\ 'ClUcKiNg'\)\ called\ at\ .+\n
- .*\bB::b\(4,\ 'ClUcKiNg'\)\ called\ at\ .+\n
- .*\bA::a\(4,\ 'ClUcKiNg'\)\ called\ at\ .+\n
-- .*\b(?:eval\ {\.\.\.}|require\ 0)\ called\ at\ /x)
-+ .*\b(?:eval\ \{\.\.\.}|require\ 0)\ called\ at\ /x)
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -453,7 +453,7 @@ if ($@ =~ /\bCrOaKiNg\ at\ .+\n
- .*\bC::c\(1,\ 'CrOaKiNg'\)\ called\ at\ .+\n
- .*\bB::b\(1,\ 'CrOaKiNg'\)\ called\ at\ .+\n
- .*\bA::a\(1,\ 'CrOaKiNg'\)\ called\ at\ .+\n
-- .*\b(?:eval\ {\.\.\.}|require\ 0)\ called\ at\ /x)
-+ .*\b(?:eval\ \{\.\.\.}|require\ 0)\ called\ at\ /x)
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -466,7 +466,7 @@ if ($@ =~ /\bCoNfEsSiNg\ at\ .+\n
- .*\bC::c\(2,\ 'CoNfEsSiNg'\)\ called\ at\ .+\n
- .*\bB::b\(2,\ 'CoNfEsSiNg'\)\ called\ at\ .+\n
- .*\bA::a\(2,\ 'CoNfEsSiNg'\)\ called\ at\ .+\n
-- .*\b(?:eval\ {\.\.\.}|require\ 0)\ called\ at\ /x)
-+ .*\b(?:eval\ \{\.\.\.}|require\ 0)\ called\ at\ /x)
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -479,7 +479,7 @@ if ($@ =~ /\bCaRpInG\ at\ .+\n
- .*\bC::c\(3,\ 'CaRpInG'\)\ called\ at\ .+\n
- .*\bB::b\(3,\ 'CaRpInG'\)\ called\ at\ .+\n
- .*\bA::a\(3,\ 'CaRpInG'\)\ called\ at\ .+\n
-- .*\b(?:eval\ {\.\.\.}|require\ 0)\ called\ at\ /x)
-+ .*\b(?:eval\ \{\.\.\.}|require\ 0)\ called\ at\ /x)
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -492,7 +492,7 @@ if ($@ =~ /\bClUcKiNg\ at\ .+\n
- .*\bC::c\(4,\ 'ClUcKiNg'\)\ called\ at\ .+\n
- .*\bB::b\(4,\ 'ClUcKiNg'\)\ called\ at\ .+\n
- .*\bA::a\(4,\ 'ClUcKiNg'\)\ called\ at\ .+\n
-- .*\b(?:eval\ {\.\.\.}|require\ 0)\ called\ at\ /x)
-+ .*\b(?:eval\ \{\.\.\.}|require\ 0)\ called\ at\ /x)
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -509,7 +509,7 @@ if ($@ =~ /\bCrOaKiNg\ at\ .+\n
- .*\bC::c\(1,\ 'CrOaKiNg'\)\ called\ at\ .+\n
- .*\bB::b\(1,\ 'CrOaKiNg'\)\ called\ at\ .+\n
- .*\bA::a\(1,\ 'CrOaKiNg'\)\ called\ at\ .+\n
-- .*\b(?:eval\ {\.\.\.}|require\ 0)\ called\ at\ /x)
-+ .*\b(?:eval\ \{\.\.\.}|require\ 0)\ called\ at\ /x)
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -522,7 +522,7 @@ if ($@ =~ /\bCoNfEsSiNg\ at\ .+\n
- .*\bC::c\(2,\ 'CoNfEsSiNg'\)\ called\ at\ .+\n
- .*\bB::b\(2,\ 'CoNfEsSiNg'\)\ called\ at\ .+\n
- .*\bA::a\(2,\ 'CoNfEsSiNg'\)\ called\ at\ .+\n
-- .*\b(?:eval\ {\.\.\.}|require\ 0)\ called\ at\ /x)
-+ .*\b(?:eval\ \{\.\.\.}|require\ 0)\ called\ at\ /x)
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -535,7 +535,7 @@ if ($@ =~ /\bCaRpInG\ at\ .+\n
- .*\bC::c\(3,\ 'CaRpInG'\)\ called\ at\ .+\n
- .*\bB::b\(3,\ 'CaRpInG'\)\ called\ at\ .+\n
- .*\bA::a\(3,\ 'CaRpInG'\)\ called\ at\ .+\n
-- .*\b(?:eval\ {\.\.\.}|require\ 0)\ called\ at\ /x)
-+ .*\b(?:eval\ \{\.\.\.}|require\ 0)\ called\ at\ /x)
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
-@@ -548,7 +548,7 @@ if ($@ =~ /\bClUcKiNg\ at\ .+\n
- .*\bC::c\(4,\ 'ClUcKiNg'\)\ called\ at\ .+\n
- .*\bB::b\(4,\ 'ClUcKiNg'\)\ called\ at\ .+\n
- .*\bA::a\(4,\ 'ClUcKiNg'\)\ called\ at\ .+\n
-- .*\b(?:eval\ {\.\.\.}|require\ 0)\ called\ at\ /x)
-+ .*\b(?:eval\ \{\.\.\.}|require\ 0)\ called\ at\ /x)
- {print "ok $n\n";} else {print "not ok $n\n";}
- $n++;
-
---
-2.14.1
-
diff --git a/dev-perl/Date-Pcalc/metadata.xml b/dev-perl/Date-Pcalc/metadata.xml
deleted file mode 100644
index 57c201e99f10..000000000000
--- a/dev-perl/Date-Pcalc/metadata.xml
+++ /dev/null
@@ -1,16 +0,0 @@
-<?xml version="1.0" encoding="UTF-8"?>
-<!DOCTYPE pkgmetadata SYSTEM "http://www.gentoo.org/dtd/metadata.dtd">
-<pkgmetadata>
- <maintainer type="project">
- <email>perl@gentoo.org</email>
- <name>Gentoo Perl Project</name>
- </maintainer>
- <upstream>
- <remote-id type="cpan">Date-Pcalc</remote-id>
- <remote-id type="cpan-module">Date::Pcalc</remote-id>
- <remote-id type="cpan-module">Date::Pcalc::Object</remote-id>
- <remote-id type="cpan-module">Date::Pcalendar</remote-id>
- <remote-id type="cpan-module">Date::Pcalendar::Profiles</remote-id>
- <remote-id type="cpan-module">Date::Pcalendar::Year</remote-id>
- </upstream>
-</pkgmetadata>