diff options
| author | James Meyer <James.meyer@operamail.com> | 2008-10-02 03:19:12 (GMT) |
|---|---|---|
| committer | James Meyer <James.meyer@operamail.com> | 2008-10-02 03:19:12 (GMT) |
| commit | 0e2532d4e8f4eed5e047f1db54d5c03ba849ec0a (patch) | |
| tree | c0aa2c0b53c317be87eacfcb77b63f53f1f415e7 /abs/core-testing/perl_modules/perl-xml-sax/perl-xml-sax.patch | |
| download | linhes_pkgbuild-0e2532d4e8f4eed5e047f1db54d5c03ba849ec0a.zip linhes_pkgbuild-0e2532d4e8f4eed5e047f1db54d5c03ba849ec0a.tar.gz linhes_pkgbuild-0e2532d4e8f4eed5e047f1db54d5c03ba849ec0a.tar.bz2 | |
initial import
Diffstat (limited to 'abs/core-testing/perl_modules/perl-xml-sax/perl-xml-sax.patch')
| -rw-r--r-- | abs/core-testing/perl_modules/perl-xml-sax/perl-xml-sax.patch | 45 |
1 files changed, 45 insertions, 0 deletions
diff --git a/abs/core-testing/perl_modules/perl-xml-sax/perl-xml-sax.patch b/abs/core-testing/perl_modules/perl-xml-sax/perl-xml-sax.patch new file mode 100644 index 0000000..88e653d --- /dev/null +++ b/abs/core-testing/perl_modules/perl-xml-sax/perl-xml-sax.patch @@ -0,0 +1,45 @@ +--- XML-SAX-0.16/Makefile.PL.orig 2008-04-08 10:36:43.718155829 +0200 ++++ XML-SAX-0.16/Makefile.PL 2008-04-08 10:37:17.347001804 +0200 +@@ -12,42 +12,3 @@ + }, + ); + +-sub MY::install { +- package MY; +- my $script = shift->SUPER::install(@_); +- +- # Only modify existing ParserDetails.ini if user agrees +- +- my $write_ini_ok = 0; +- +- eval { require XML::SAX }; +- if ($@) { +- $write_ini_ok = 1; +- } +- else { +- my $dir = File::Basename::dirname($INC{'XML/SAX.pm'}); +- if (-e File::Spec->catfile($dir, 'SAX', 'ParserDetails.ini')) { +- $write_ini_ok = +- ExtUtils::MakeMaker::prompt( +- "Do you want XML::SAX to alter ParserDetails.ini?", "Y" +- ) =~ /^y/i; +- } +- else { +- $write_ini_ok = 1; +- } +- } +- +- if ($write_ini_ok) { +- $script =~ s/install :: (.*)$/install :: $1 install_sax_pureperl/m; +- $script .= <<"INSTALL"; +- +-install_sax_pureperl : +-\t\@\$(PERL) -MXML::SAX -e "XML::SAX->add_parser(q(XML::SAX::PurePerl))->save_parsers()" +- +-INSTALL +- +- } +- +- return $script; +-} +- |