diff options
Diffstat (limited to 'abs/core/perl_modules/perl-xml-sax/perl-xml-sax.patch')
-rw-r--r-- | abs/core/perl_modules/perl-xml-sax/perl-xml-sax.patch | 45 |
1 files changed, 45 insertions, 0 deletions
diff --git a/abs/core/perl_modules/perl-xml-sax/perl-xml-sax.patch b/abs/core/perl_modules/perl-xml-sax/perl-xml-sax.patch new file mode 100644 index 0000000..88e653d --- /dev/null +++ b/abs/core/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; +-} +- |