Mercurial > vanilla

diff perl/p5-xml-sax/patch-disable-install.patch @ 614:a92f2e4886b3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
perl: rename perl-* to p5-*
author David Demelier <markand@malikania.fr>
date Tue, 23 Jul 2019 20:10:00 +0200
parents
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/perl/p5-xml-sax/patch-disable-install.patch	Tue Jul 23 20:10:00 2019 +0200
@@ -0,0 +1,46 @@
+--- Makefile.PL.orig	2019-07-23 09:37:28.347663640 +0200
++++ Makefile.PL	2019-07-23 09:37:35.547568856 +0200
+@@ -12,43 +12,3 @@
+         'XML::NamespaceSupport' => 0.03,
+     },    
+ );
+-
+-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 : pure_install
+-\t\@\$(PERL) -MXML::SAX -e "XML::SAX->add_parser(q(XML::SAX::PurePerl))->save_parsers()"
+-
+-INSTALL
+-
+-    }
+-
+-    return $script;
+-}
+-