dev-perl/HTML-TagFilter: Fix tests without '.' in @INC bug #616992

Closes: https://bugs.gentoo.org/616992
Package-Manager: Portage-2.3.8, Repoman-2.3.3

diff --git a/dev-perl/HTML-TagFilter/HTML-TagFilter-1.30.0.ebuild b/dev-perl/HTML-TagFilter/HTML-TagFilter-1.30.0.ebuild
index dfef44f4652fa1b6139a9fa5ef029f3dd92036af..731bc5bd494b48d171640895b51b7918b87ed6c2 100644 (file)
--- a/dev-perl/HTML-TagFilter/HTML-TagFilter-1.30.0.ebuild
+++ b/dev-perl/HTML-TagFilter/HTML-TagFilter-1.30.0.ebuild
@@ -1,4 +1,4 @@
-# Copyright 1999-2014 Gentoo Foundation
+# Copyright 1999-2017 Gentoo Foundation
 # Distributed under the terms of the GNU General Public License v2
 
 EAPI=5
@@ -18,5 +18,6 @@ RDEPEND="
        dev-perl/URI
 "
 DEPEND="${RDEPEND}"
+PATCHES=( "${FILESDIR}/${P}-no-dot-inc.patch" )
 
 SRC_TEST="do"

diff --git a/dev-perl/HTML-TagFilter/files/HTML-TagFilter-1.30.0-no-dot-inc.patch b/dev-perl/HTML-TagFilter/files/HTML-TagFilter-1.30.0-no-dot-inc.patch
new file mode 100644 (file)
index 0000000..cc2f106
--- /dev/null
+++ b/dev-perl/HTML-TagFilter/files/HTML-TagFilter-1.30.0-no-dot-inc.patch
@@ -0,0 +1,46 @@
+From 6b22ff73fac56cd405f021f5c9fd1cce6f62cff0 Mon Sep 17 00:00:00 2001
+From: Kent Fredric <kentnl@gentoo.org>
+Date: Tue, 24 Oct 2017 18:44:46 +1300
+Subject: Fix tests for '.' in @INC
+
+Bug: https://bugs.gentoo.org/616992
+Bug: https://rt.cpan.org/Ticket/Display.html?id=121449
+---
+ MANIFEST                   | 2 +-
+ t/04-subclass.t            | 1 +
+ {My => t/lib/My}/Filter.pm | 0
+ 3 files changed, 2 insertions(+), 1 deletion(-)
+ rename {My => t/lib/My}/Filter.pm (100%)
+
+diff --git a/MANIFEST b/MANIFEST
+index 2ef9813..ef6a569 100644
+--- a/MANIFEST
++++ b/MANIFEST
+@@ -3,7 +3,7 @@ Makefile.PL
+ MANIFEST
+ README
+ TagFilter.pm
+-My/Filter.pm
++t/lib/My/Filter.pm
+ t/01-filter.t
+ t/02-xss.t
+ t/03-extension.t
+diff --git a/t/04-subclass.t b/t/04-subclass.t
+index ef2eb61..f8b3598 100644
+--- a/t/04-subclass.t
++++ b/t/04-subclass.t
+@@ -2,6 +2,7 @@ package main;
+ 
+ use strict;
+ use Test::More;
++use lib 't/lib';
+ use My::Filter;
+ 
+ BEGIN {
+diff --git a/My/Filter.pm b/t/lib/My/Filter.pm
+similarity index 100%
+rename from My/Filter.pm
+rename to t/lib/My/Filter.pm
+-- 
+2.14.2
+