diff options
author | Danny Rawlins <monster.romster@gmail.com> | 2012-10-17 13:20:12 +1100 |
---|---|---|
committer | Danny Rawlins <monster.romster@gmail.com> | 2012-10-17 13:20:12 +1100 |
commit | b7a08c156c40c92ae38bbd8b0e007dfc3b5a0822 (patch) | |
tree | 6bdd7ef3b94e5a617d8744ba667989a47d309d48 /openjade | |
parent | 6b540ece3fb46501e0c015a1781be06b4b706b6d (diff) | |
download | contrib-b7a08c156c40c92ae38bbd8b0e007dfc3b5a0822.tar.gz contrib-b7a08c156c40c92ae38bbd8b0e007dfc3b5a0822.tar.xz |
openjade: fix compile issue with perl
Diffstat (limited to 'openjade')
-rw-r--r-- | openjade/.md5sum | 1 | ||||
-rw-r--r-- | openjade/Pkgfile | 5 | ||||
-rw-r--r-- | openjade/msggen.pl.patch | 32 |
3 files changed, 36 insertions, 2 deletions
diff --git a/openjade/.md5sum b/openjade/.md5sum index c0faa2016..ded8adc87 100644 --- a/openjade/.md5sum +++ b/openjade/.md5sum @@ -1,2 +1,3 @@ b9859c43b4fda76a812d46cc101cfe27 iostream.patch +a175eea2fec14f533ec90d515a598606 msggen.pl.patch cbf3d8be3e3516dcb12b751de822b48c openjade-1.3.3-pre1.tar.gz diff --git a/openjade/Pkgfile b/openjade/Pkgfile index 8e6f208ee..2d63c136c 100644 --- a/openjade/Pkgfile +++ b/openjade/Pkgfile @@ -6,14 +6,15 @@ name=openjade version=1.3.3-pre1 -release=1 +release=2 source=(http://downloads.sourceforge.net/project/$name/$name/1.3.3/$name-$version.tar.gz - iostream.patch) + iostream.patch msggen.pl.patch) build() { cd $name-$version patch -p 1 -i $SRC/iostream.patch + patch -p 1 -i $SRC/msggen.pl.patch ./configure \ --prefix=/usr \ diff --git a/openjade/msggen.pl.patch b/openjade/msggen.pl.patch new file mode 100644 index 000000000..2f8745642 --- /dev/null +++ b/openjade/msggen.pl.patch @@ -0,0 +1,32 @@ +Use Getopt::Std in place of getopts.pl. +https://bugs.gentoo.org/show_bug.cgi?id=420083 + +--- a/msggen.pl ++++ b/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 |