Date: Sun, 22 Jul 2012 20:59:57 +0000 (UTC) From: Steve Wills <swills@FreeBSD.org> To: ports-committers@freebsd.org, svn-ports-all@freebsd.org, svn-ports-head@freebsd.org Subject: svn commit: r301352 - head/textproc/openjade/files Message-ID: <201207222059.q6MKxvsw025945@svn.freebsd.org>
next in thread | raw e-mail | index | archive | help
Author: swills Date: Sun Jul 22 20:59:56 2012 New Revision: 301352 URL: http://svn.freebsd.org/changeset/ports/301352 Log: - Fix build with perl 5.16 PR: ports/169654 Approved by: maintainer timeout (kuriyama, >2 weeks) Obtained from: http://sourceforge.net/mailarchive/forum.php?thread_name=CAF1ZMEf6eEiv%3D%3DsOcZgftY3iSd79MkWgTU0vcK9w6BJCNSp5DA%40mail.gmail.com&forum_name=openjade-devel Added: head/textproc/openjade/files/patch-msggen (contents, props changed) Added: head/textproc/openjade/files/patch-msggen ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ head/textproc/openjade/files/patch-msggen Sun Jul 22 20:59:56 2012 (r301352) @@ -0,0 +1,32 @@ +Use Getopt::Std in place of getopts.pl. +https://bugs.gentoo.org/show_bug.cgi?id=420083 + +--- msggen.pl ++++ msggen.pl +@@ -4,6 +4,7 @@ + # See the file COPYING for copying permission. + + use POSIX; ++use Getopt::Std; + + # Package and version. + $package = 'openjade'; +@@ -18,8 +19,7 @@ + undef $opt_l; + undef $opt_p; + undef $opt_t; +-do 'getopts.pl'; +-&Getopts('l:p:t:'); ++getopts('l:p:t:'); + $module = $opt_l; + $pot_file = $opt_p; + +@@ -72,7 +72,7 @@ + else { + $field[0] =~ /^[IWQXE][0-9]$/ || &error("invalid first field");; + $type[$num] = substr($field[0], 0, 1); +- $argc = int(substr($field[0], 1, 1)); ++ $argc = substr($field[0], 1, 1); + } + $nargs[$num] = $argc; + $field[1] =~ /^[a-zA-Z_][a-zA-Z0-9_]+$/ || &error("invalid tag"); \ No newline at end of file
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?201207222059.q6MKxvsw025945>