Ticket #36759: openjade-getoptperl.patch

File openjade-getoptperl.patch, 510 bytes (added by lockhart (Thomas Lockhart), 12 years ago)

Patch to allow building with perl5.16 and higher. Also builds with perl5.12 (and probably any perl5). Patch taken verbatim from a recent Fedora source RPM but needed to change the depth of the file paths to be compatible with using "patch -p0" as is the case for the existing patches.

  • msggen.pl 

    diff -urNp openjade-1.3.2-orig/msggen.pl openjade-1.3.2/msggen.pl
    old new  
    44# See the file COPYING for copying permission.
    55
    66use POSIX;
     7use Getopt::Std;
    78
    89# Package and version.
    910$package = 'openjade';
    … … $gen_c = 0; 
    1819undef $opt_l;
    1920undef $opt_p;
    2021undef $opt_t;
    21 do 'getopts.pl';
    22 &Getopts('l:p:t:');
     22getopts('l:p:t:');
    2323$module = $opt_l;
    2424$pot_file = $opt_p;
    2525