gentoo resync : 14.07.2018

1 files changed, 0 insertions, 67 deletions

diff --git a/dev-perl/Devel-SmallProf/files/Devel-SmallProf-2.20.0-perl526.patch b/dev-perl/Devel-SmallProf/files/Devel-SmallProf-2.20.0-perl526.patch
deleted file mode 100644
index 538387562a62..000000000000
--- a/dev-perl/Devel-SmallProf/files/Devel-SmallProf-2.20.0-perl526.patch
+++ /dev/null
@@ -1,67 +0,0 @@
-From 70d450555b1792530c4230cecf84a044b2c3f9ce Mon Sep 17 00:00:00 2001
-From: Kent Fredric <kentnl@gentoo.org>
-Date: Sun, 8 Oct 2017 11:45:25 +1300
-Subject: Fix Perl 5.26 support without '.' in @INC
-
-1. Tests rely on "do $LOCALFILE" syntax
-2. Runtime conditionally can load a local file ('./.smallprof')
-
-Bug: https://bugs.gentoo.org/615590
-Bug: https://rt.cpan.org/Ticket/Display.html?id=121134
----
- lib/Devel/SmallProf.pm | 4 ++--
- t/part1.t              | 2 +-
- t/part2.t              | 2 +-
- t/part3.t              | 2 +-
- 4 files changed, 5 insertions(+), 5 deletions(-)
-
-diff --git a/lib/Devel/SmallProf.pm b/lib/Devel/SmallProf.pm
-index 2b5d091..4fdd66a 100644
---- a/lib/Devel/SmallProf.pm
-+++ b/lib/Devel/SmallProf.pm
-@@ -55,8 +55,8 @@ BEGIN {
-   $drop_zeros = 0;
-   $profile = 1;
-   $grep_format = 0;
--  if (-e '.smallprof') {
--    do '.smallprof';
-+  if (-e './.smallprof') {
-+    do './.smallprof';
-   }
-   my $env=$ENV{SMALLPROF_CONFIG}||'';
-   $drop_zeros = 1 if $env=~/z/;
-diff --git a/t/part1.t b/t/part1.t
-index 805ebe4..483f203 100644
---- a/t/part1.t
-+++ b/t/part1.t
-@@ -6,4 +6,4 @@
- # doesn't have it's contents put into the symbol table.  Thus this shim which
- # invokes the real part1 so that its contents are visible.
- 
--do 't/part1.b' or die "$!";
-+do './t/part1.b' or die "$!";
-diff --git a/t/part2.t b/t/part2.t
-index c808010..335d032 100644
---- a/t/part2.t
-+++ b/t/part2.t
-@@ -9,7 +9,7 @@ unless (open(OUT,'smallprof.out')) {
- undef $/;
- $_ = <OUT>;
- close OUT;
--print +(/Profile of \(eval/ && m!Profile of t.part1\.b!) 
-+print +(/Profile of \(eval/ && m!Profile of \./t.part1\.b!)
-                                            ? "ok  1\n" : "not ok  1\n";
- my (@matches) = /Profile of/g;
- print +(@matches == 3)                     ? "ok  2\n" : "not ok  2\n";
-diff --git a/t/part3.t b/t/part3.t
-index 652b306..135d4ca 100644
---- a/t/part3.t
-+++ b/t/part3.t
-@@ -1,3 +1,3 @@
- #!perl -d:SmallProf
- 
--do 't/part3.b' or die "$!";
-+do './t/part3.b' or die "$!";
--- 
-2.14.1
-