Date: Fri, 20 May 2016 09:30:19 +0000 (UTC) From: Mathieu Arnold <mat@FreeBSD.org> To: ports-committers@freebsd.org, svn-ports-all@freebsd.org, svn-ports-head@freebsd.org Subject: svn commit: r415549 - head/textproc/p5-Lingua-EN-Tagger/files Message-ID: <201605200930.u4K9UJKb037716@repo.freebsd.org>
next in thread | raw e-mail | index | archive | help
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 ){
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?201605200930.u4K9UJKb037716>