Bug#853490: libdomain-publicsuffix-perl: ftbfs with GCC-7

[Gianfranco Costamagna]

control: tags -1 patch

Hello, the following patch (from upstream) fixed the issue for me (and testsuite)

http://launchpadlibrarian.net/322742392/libdomain-publicsuffix-perl_0.14.1-1_0.14.1-1ubuntu1.diff.gz

--- libdomain-publicsuffix-perl-0.14.1/debian/patches/65fb42981662f8d960766222c1be9ce4a20e0c6a.patch	1970-01-01 00:00:00.000000000 +0000
+++ libdomain-publicsuffix-perl-0.14.1/debian/patches/65fb42981662f8d960766222c1be9ce4a20e0c6a.patch	2017-06-06 11:52:34.000000000 +0000
@@ -0,0 +1,22 @@
+From 65fb42981662f8d960766222c1be9ce4a20e0c6a Mon Sep 17 00:00:00 2001
+From: Gavin Carr <gavin at openfusion.com.au>
+Date: Wed, 31 May 2017 14:57:59 +1000
+Subject: [PATCH] Use explicit utf-8 encoding on searched path open.
+
+---
+ lib/Domain/PublicSuffix.pm | 2 +-
+ 1 file changed, 1 insertion(+), 1 deletion(-)
+
+diff --git a/lib/Domain/PublicSuffix.pm b/lib/Domain/PublicSuffix.pm
+index 0ab452f..cfa01ae 100755
+--- a/lib/Domain/PublicSuffix.pm
++++ b/lib/Domain/PublicSuffix.pm
+@@ -251,7 +251,7 @@ sub _parse_data_file {
+ 		foreach my $path (@paths) {
+ 			$path = File::Spec->catfile( $path, "effective_tld_names.dat" );
+ 			if ( -e $path ) {
+-				open( $dat, '<', $path )
++				open( $dat, '<:encoding(UTF-8)', $path )
+ 					or die "Cannot open \'" . $path . "\': " . $!;
+ 				@tld_lines = <$dat>;
+ 				close($dat);
diff -Nru libdomain-publicsuffix-perl-0.14.1/debian/patches/series libdomain-publicsuffix-perl-0.14.1/debian/patches/series
--- libdomain-publicsuffix-perl-0.14.1/debian/patches/series	1970-01-01 00:00:00.000000000 +0000
+++ libdomain-publicsuffix-perl-0.14.1/debian/patches/series	2017-06-06 11:51:53.000000000 +0000
@@ -0,0 +1 @@
+65fb42981662f8d960766222c1be9ce4a20e0c6a.patch

cheers,
G.

-------------- next part --------------
A non-text attachment was scrubbed...
Name: signature.asc
Type: application/pgp-signature
Size: 819 bytes
Desc: OpenPGP digital signature
URL: <http://lists.alioth.debian.org/pipermail/pkg-perl-maintainers/attachments/20170606/465a3520/attachment.sig>