--- libnet-1.16/Configure~	2003-06-20 00:38:25 +0000

+++ libnet-1.16/Configure	2003-06-20 00:41:24 +0000

@@ -241,6 +241,7 @@ $libnet_cfg = "libnet.cfg"

 my %oldcfg = ();

 $Net::Config::CONFIGURE = 1; # Suppress load of user overrides

+if (0) {

 if( -f $libnet_cfg )

  {

   %oldcfg = ( %{ do $libnet_cfg } );

@@ -250,6 +251,7 @@ elsif (eval { require Net::Config }) 

   $have_old = 1;

   %oldcfg = %Net::Config::NetConfig;

  }

+}

 map { $cfg{lc $_} = $cfg{$_}; delete $cfg{$_} if /[A-Z]/ } keys %cfg;

--- libnet-1.16/Makefile.PL	2003-06-18 17:41:43 +0000

+++ libnet-1.16.my/Makefile.PL	2003-06-20 01:06:27 +0000

@@ -41,15 +41,7 @@ sub MY::post_initialize

  my $config_pm = "Net/libnet.cfg";

  my $libnet_cfg = "libnet.cfg";

- # Use %INC and ExtUtils::MakeMaker to determine how this machine

- # maps package names to path names

-

- foreach (keys %INC) {

-  last if ($config_pm = $_) =~ s/^ExtUtils(.)MakeMaker.pm/Net${1}libnet.cfg/;

- }

-

- system(($^O eq 'VMS' ? 'mcr ': ()),$^X, 'Configure')

-	unless -f $libnet_cfg;

+ system(($^O eq 'VMS' ? 'mcr ': ()),$^X, 'Configure');

  $self->{PM}->{$libnet_cfg} = $self->catfile('$(INST_LIBDIR)',$config_pm);