svn commit: r452509 - in head: chinese/p5-Lingua-ZH-TaBE/files devel/p5-Class-Spiffy/files devel/p5-SVN-ACL/files textproc/p5-Plucene-Analysis-CJKAnalyzer/files www/p5-Yahoo-Lifestyle/files

[Mathieu Arnold]

Author: mat
Date: Fri Oct 20 09:15:06 2017
New Revision: 452509
URL: https://svnweb.freebsd.org/changeset/ports/452509

Log:
  Fix build with recent perl-devel.
  
  Sponsored by:	Absolight

Added:
  head/chinese/p5-Lingua-ZH-TaBE/files/
  head/chinese/p5-Lingua-ZH-TaBE/files/patch-inc_Module_Install.pm   (contents, props changed)
  head/devel/p5-Class-Spiffy/files/
  head/devel/p5-Class-Spiffy/files/patch-inc_Module_Install.pm   (contents, props changed)
  head/devel/p5-SVN-ACL/files/
  head/devel/p5-SVN-ACL/files/patch-inc_Module_Install.pm   (contents, props changed)
  head/textproc/p5-Plucene-Analysis-CJKAnalyzer/files/
  head/textproc/p5-Plucene-Analysis-CJKAnalyzer/files/patch-inc_Module_Install.pm   (contents, props changed)
  head/www/p5-Yahoo-Lifestyle/files/
  head/www/p5-Yahoo-Lifestyle/files/patch-inc_Module_Install.pm   (contents, props changed)

Added: head/chinese/p5-Lingua-ZH-TaBE/files/patch-inc_Module_Install.pm
==============================================================================
--- /dev/null	00:00:00 1970	(empty, because file is newly added)
+++ head/chinese/p5-Lingua-ZH-TaBE/files/patch-inc_Module_Install.pm	Fri Oct 20 09:15:06 2017	(r452509)
@@ -0,0 +1,11 @@
+--- inc/Module/Install.pm.orig	2005-12-31 07:37:24 UTC
++++ inc/Module/Install.pm
+@@ -89,7 +89,7 @@ sub preload {
+     my %seen_method;
+     foreach my $obj ( @exts ) {
+         while (my ($method, $glob) = each %{ref($obj) . '::'}) {
+-            next unless defined *{$glob}{CODE};
++            next unless exists &{ref($obj).'::'.$method};
+             next if $method =~ /^_/;
+             next if $method eq uc($method);
+             $seen_method{$method}++;

Added: head/devel/p5-Class-Spiffy/files/patch-inc_Module_Install.pm
==============================================================================
--- /dev/null	00:00:00 1970	(empty, because file is newly added)
+++ head/devel/p5-Class-Spiffy/files/patch-inc_Module_Install.pm	Fri Oct 20 09:15:06 2017	(r452509)
@@ -0,0 +1,11 @@
+--- inc/Module/Install.pm.orig	2006-01-26 08:25:18 UTC
++++ inc/Module/Install.pm
+@@ -89,7 +89,7 @@ sub preload {
+     my %seen_method;
+     foreach my $obj ( @exts ) {
+         while (my ($method, $glob) = each %{ref($obj) . '::'}) {
+-            next unless defined *{$glob}{CODE};
++            next unless exists &{ref($obj).'::'.$method};
+             next if $method =~ /^_/;
+             next if $method eq uc($method);
+             $seen_method{$method}++;

Added: head/devel/p5-SVN-ACL/files/patch-inc_Module_Install.pm
==============================================================================
--- /dev/null	00:00:00 1970	(empty, because file is newly added)
+++ head/devel/p5-SVN-ACL/files/patch-inc_Module_Install.pm	Fri Oct 20 09:15:06 2017	(r452509)
@@ -0,0 +1,11 @@
+--- inc/Module/Install.pm.orig	2006-01-16 15:53:58 UTC
++++ inc/Module/Install.pm
+@@ -81,7 +81,7 @@ sub preload {
+     my %seen_method;
+     foreach my $obj (@exts) {
+         while (my ($method, $glob) = each %{ref($obj) . '::'}) {
+-            next unless defined *{$glob}{CODE};
++            next unless exists &{ref($obj).'::'.$method};
+             next if $method =~ /^_/;
+             next if $method eq uc($method);
+             $seen_method{$method}++;

Added: head/textproc/p5-Plucene-Analysis-CJKAnalyzer/files/patch-inc_Module_Install.pm
==============================================================================
--- /dev/null	00:00:00 1970	(empty, because file is newly added)
+++ head/textproc/p5-Plucene-Analysis-CJKAnalyzer/files/patch-inc_Module_Install.pm	Fri Oct 20 09:15:06 2017	(r452509)
@@ -0,0 +1,11 @@
+--- inc/Module/Install.pm.orig	2006-01-19 16:08:23 UTC
++++ inc/Module/Install.pm
+@@ -89,7 +89,7 @@ sub preload {
+     my %seen_method;
+     foreach my $obj ( @exts ) {
+         while (my ($method, $glob) = each %{ref($obj) . '::'}) {
+-            next unless defined *{$glob}{CODE};
++            next unless exists &{ref($obj).'::'.$method};
+             next if $method =~ /^_/;
+             next if $method eq uc($method);
+             $seen_method{$method}++;

Added: head/www/p5-Yahoo-Lifestyle/files/patch-inc_Module_Install.pm
==============================================================================
--- /dev/null	00:00:00 1970	(empty, because file is newly added)
+++ head/www/p5-Yahoo-Lifestyle/files/patch-inc_Module_Install.pm	Fri Oct 20 09:15:06 2017	(r452509)
@@ -0,0 +1,11 @@
+--- inc/Module/Install.pm.orig	2008-01-17 09:10:29 UTC
++++ inc/Module/Install.pm
+@@ -81,7 +81,7 @@ sub preload {
+     my %seen_method;
+     foreach my $obj (@exts) {
+         while (my ($method, $glob) = each %{ref($obj) . '::'}) {
+-            next unless defined *{$glob}{CODE};
++            next unless exists &{ref($obj).'::'.$method};
+             next if $method =~ /^_/;
+             next if $method eq uc($method);
+             $seen_method{$method}++;