hi saul:
  please see my comment as following

dennis

At 2012-6-29 AM1:27，"Saul Wold" &
>
> On 06/27/2012 09:56 PM, dennis lan wrote:
>
>> From: Dennis Lan<dennis.yxun@gmail.com>
>>
>> Using Gentoo Linux as the build host, it fails without this patch
>> Use Getopt::Std in place of getopts.pl.
>>
>> https://bugs.gentoo.org/show_**bug.cgi?id=420083<https://bugs.gentoo.org/show_bug.cgi?id=420083>
>>
>> which following error:
>> /usr/bin/perl -w ./../msggen.pl -l jstyleModule InterpreterMessages.msg
>> /usr/bin/perl -w ./../msggen.pl -l jstyleModule DssslAppMessages.msg
>> Undefined subroutine&main::Getopts called at ./../msggen.pl line 22.
>> make[2]: *** [InterpreterMessages.h] Error 2
>> make[2]: *** Waiting for unfinished jobs....
>> Undefined subroutine&main::Getopts called at ./../msggen.pl line 22.
>> make[2]: *** [DssslAppMessages.h] Error 2
>>
>> Upstream-Status: Submitted [openjade-devel@lists.**sourceforge.net<openjade-devel@lists.sourceforge.net>
>> ]
>>
>>  This needs to be in the patch file itself, we can track the patches
> better that way.
>
>> Signed-off-by: Dennis Lan<dennis.yxun@gmail.com>
>> ---
>>   .../openjade/openjade-1.3.2/**msggen.pl.patch        |   32
>> ++++++++++++++++++++
>>   .../openjade/openjade-native_**1.3.2.bb<http://openjade-native_1.3.2.bb>             |    1 +
>>   2 files changed, 33 insertions(+), 0 deletions(-)
>>   create mode 100644 meta/recipes-devtools/**openjade/openjade-1.3.2/**
>> msggen.pl.patch
>>
>> diff --git a/meta/recipes-devtools/**openjade/openjade-1.3.2/**msggen.pl.patch
>> b/meta/recipes-devtools/**openjade/openjade-1.3.2/**msggen.pl.patch
>> new file mode 100644
>> index 0000000..1afe68b
>> --- /dev/null
>> +++ b/meta/recipes-devtools/**openjade/openjade-1.3.2/**msggen.pl.patch
>>
>
> Please add comment Upstream-Status and SOB to the patch itself.
>
> Thanks
> Sau!
>
>  @@ -0,0 +1,32 @@
>> +Use Getopt::Std in place of getopts.pl.
>> +https://bugs.gentoo.org/show_**bug.cgi?id=420083<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");
>> diff --git a/meta/recipes-devtools/**openjade/openjade-native_1.3.**2.bb<http://openjade-native_1.3.2.bb>b/meta/recipes-devtools/
>> **openjade/openjade-native_1.3.**2.bb <http://openjade-native_1.3.2.bb>
>> index 5b29c1f..efd1e11 100644
>> --- a/meta/recipes-devtools/**openjade/openjade-native_1.3.**2.bb<http://openjade-native_1.3.2.bb>
>> +++ b/meta/recipes-devtools/**openjade/openjade-native_1.3.**2.bb<http://openjade-native_1.3.2.bb>
>> @@ -14,6 +14,7 @@ RDEPENDS_${PN} = "sgml-common-native"
>>
>>   SRC_URI = "${SOURCEFORGE_MIRROR}/**openjade/openjade-${PV}.tar.gz \
>>              file://makefile.patch \
>> +           file://msggen.pl.patch \
>>              file://reautoconf.patch \
>>            file://user-declared-default-**constructor.patch"
>>
>>