Index: HTML-Prototype-1.35/Makefile.PL
--- HTML-Prototype-1.35/Makefile.PL.orig 2005-10-31 15:21:51 +0100
+++ HTML-Prototype-1.35/Makefile.PL 2005-10-31 15:23:36 +0100
@@ -1,31 +1,9 @@
-# Note: this file was auto-generated by Module::Build::Compat version 0.03
-
- unless (eval "use Module::Build::Compat 0.02; 1" ) {
- print "This module requires Module::Build to install itself.\n";
-
- require ExtUtils::MakeMaker;
- my $yn = ExtUtils::MakeMaker::prompt
- (' Install Module::Build now from CPAN?', 'y');
-
- unless ($yn =~ /^y/i) {
- die " *** Cannot install without Module::Build. Exiting ...\n";
- }
-
- require Cwd;
- require File::Spec;
- require CPAN;
-
- # Save this 'cause CPAN will chdir all over the place.
- my $cwd = Cwd::cwd();
- my $makefile = File::Spec->rel2abs($0);
-
- CPAN::Shell->install('Module::Build::Compat')
- or die " *** Cannot install without Module::Build. Exiting ...\n";
-
- chdir $cwd or die "Cannot chdir() back to $cwd: $!";
- }
- eval "use Module::Build::Compat 0.02; 1" or die $@;
- use lib '_build/lib';
- Module::Build::Compat->run_build_pl(args => \@ARGV);
- require Module::Build;
- Module::Build::Compat->write_makefile(build_class => 'Module::Build');
+
+require 5.006;
+use strict;
+use ExtUtils::MakeMaker;
+
+WriteMakefile(
+ NAME => 'HTML::Prototype',
+);
+
Index: HTML-Prototype-Useful-0.04/Makefile.PL
--- HTML-Prototype-Useful-0.04/Makefile.PL.orig 2005-10-31 15:24:37 +0100
+++ HTML-Prototype-Useful-0.04/Makefile.PL 2005-10-31 15:24:50 +0100
@@ -1,31 +1,9 @@
-# Note: this file was auto-generated by Module::Build::Compat version 0.03
-
- unless (eval "use Module::Build::Compat 0.02; 1" ) {
- print "This module requires Module::Build to install itself.\n";
-
- require ExtUtils::MakeMaker;
- my $yn = ExtUtils::MakeMaker::prompt
- (' Install Module::Build now from CPAN?', 'y');
-
- unless ($yn =~ /^y/i) {
- die " *** Cannot install without Module::Build. Exiting ...\n";
- }
-
- require Cwd;
- require File::Spec;
- require CPAN;
-
- # Save this 'cause CPAN will chdir all over the place.
- my $cwd = Cwd::cwd();
- my $makefile = File::Spec->rel2abs($0);
-
- CPAN::Shell->install('Module::Build::Compat')
- or die " *** Cannot install without Module::Build. Exiting ...\n";
-
- chdir $cwd or die "Cannot chdir() back to $cwd: $!";
- }
- eval "use Module::Build::Compat 0.02; 1" or die $@;
- use lib '_build/lib';
- Module::Build::Compat->run_build_pl(args => \@ARGV);
- require Module::Build;
- Module::Build::Compat->write_makefile(build_class => 'Module::Build');
+
+require 5.006;
+use strict;
+use ExtUtils::MakeMaker;
+
+WriteMakefile(
+ NAME => 'HTML::Prototype::Useful',
+);
+
Index: XML-LibXML-1.58_1/LibXML.xs
--- XML-LibXML-1.58_1/LibXML.xs.orig 2004-03-25 00:06:14 +0100
+++ XML-LibXML-1.58_1/LibXML.xs 2005-10-31 15:21:12 +0100
@@ -622,7 +622,7 @@
HV* real_obj = NULL;
SV** item = NULL;
SV* item2 = NULL;
- /* xmlInitParser(); */ /* useless call */
+ xmlInitParser();
xmlGetWarningsDefaultValue = 0;
if ( self != NULL ) {