Date: Fri, 20 May 2016 09:30:11 +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: r415547 - head/textproc/p5-XML-Twig/files Message-ID: <201605200930.u4K9UBDE037500@repo.freebsd.org>
next in thread | raw e-mail | index | archive | help
Author: mat Date: Fri May 20 09:30:10 2016 New Revision: 415547 URL: https://svnweb.freebsd.org/changeset/ports/415547 Log: Fix build with Perl 5.25. Braces should be escaped in regexps. With hat: perl@ Sponsored by: Absolight Added: head/textproc/p5-XML-Twig/files/ head/textproc/p5-XML-Twig/files/patch-speedup (contents, props changed) Added: head/textproc/p5-XML-Twig/files/patch-speedup ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ head/textproc/p5-XML-Twig/files/patch-speedup Fri May 20 09:30:10 2016 (r415547) @@ -0,0 +1,11 @@ +--- speedup.orig 2014-06-11 07:23:43 UTC ++++ speedup +@@ -12,7 +12,7 @@ my $SET_NOT_EMPTY= join( '|', qw( pcdata + # depending on the version of perl use either qr or "" + print STDERR "perl version is $]\n"; + +-my $var= '(\$[a-z_]+(?:\[\d\])?|\$t(?:wig)?->root|\$t(?:wig)?->twig_current|\$t(?:wig)?->{\'?twig_root\'?}|\$t(?:wig)?->{\'?twig_current\'?})'; ++my $var= '(\$[a-z_]+(?:\[\d\])?|\$t(?:wig)?->root|\$t(?:wig)?->twig_current|\$t(?:wig)?->\{\'?twig_root\'?}|\$t(?:wig)?->\{\'?twig_current\'?})'; + + my $set_to = '(?:undef|\$\w+|\$\w+->\{\w+\}|\$\w+->\w+|\$\w+->\w+\([^)]+\))'; + my $elt = '\$(?:elt|new_elt|child|cdata|ent|_?parent|twig_current|next_sibling|first_child|prev_sibling|last_child|ref|elt->_parent)';
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?201605200930.u4K9UBDE037500>