svn commit: r415549 - head/textproc/p5-Lingua-EN-Tagger/files

Mathieu Arnold mat at FreeBSD.org
Fri May 20 09:30:21 UTC 2016


Author: mat
Date: Fri May 20 09:30:19 2016
New Revision: 415549
URL: https://svnweb.freebsd.org/changeset/ports/415549

Log:
  Fix build with Perl 5.25.
  
  Braces should be escaped in regexps.
  
  With hat:	perl@
  Sponsored by:	Absolight

Added:
  head/textproc/p5-Lingua-EN-Tagger/files/
  head/textproc/p5-Lingua-EN-Tagger/files/patch-Makefile.PL   (contents, props changed)

Added: head/textproc/p5-Lingua-EN-Tagger/files/patch-Makefile.PL
==============================================================================
--- /dev/null	00:00:00 1970	(empty, because file is newly added)
+++ head/textproc/p5-Lingua-EN-Tagger/files/patch-Makefile.PL	Fri May 20 09:30:19 2016	(r415549)
@@ -0,0 +1,20 @@
+--- Makefile.PL.orig	2012-05-28 13:24:29 UTC
++++ Makefile.PL
+@@ -59,7 +59,7 @@ sub _load_words {
+         my ( $file ) = @_;
+         my $fh = new FileHandle $file;
+         while ( <$fh> ){
+-                my ( $key, $data ) = m/^"?([^{"]+)"?: { (.*) }/;
++                my ( $key, $data ) = m/^"?([^{"]+)"?: \{ (.*) }/;
+                 next unless $key and $data;
+                 my %tags = split /[:,]\s+/, $data;
+                 foreach( keys %tags ){
+@@ -73,7 +73,7 @@ sub _load_tags {
+         my ( $file ) = @_;
+         my $fh = new FileHandle $file;
+         while ( <$fh> ){
+-                my ( $key, $data ) = m/^"?([^{"]+)"?: { (.*) }/;
++                my ( $key, $data ) = m/^"?([^{"]+)"?: \{ (.*) }/;
+                 next unless $key and $data;
+                 my %tags = split /[:,]\s+/, $data;
+                 foreach( keys %tags ){


More information about the svn-ports-head mailing list