From: Michael G. Schwern <schwern@pobox.com>
Date: Sun, 3 Mar 2002 13:33:28 +0000 (-0500)
Subject: use Config; use Config; require Config;
X-Git-Tag: perl-5.7.3~64
X-Git-Url: https://perl5.git.perl.org/perl5.git/commitdiff_plain/95a492cf6bbdfb56c6716b9a288e6cebf60361ca

use Config; use Config; require Config;
   Message-Id: <20020303183328.GA3296@blackrider>

p4raw-id: //depot/perl@14966
---

diff --git a/utils/h2xs.PL b/utils/h2xs.PL
index a18dac6..f1762c9 100644
--- a/utils/h2xs.PL
+++ b/utils/h2xs.PL
@@ -688,7 +688,6 @@ my ($name, %fullpath, %prefix, %seen_define, %prefixless, %const_names);
 my $module = $opt_n;
 
 if( @path_h ){
-    use Config;
     use File::Spec;
     my @paths;
     my $pre_sub_tri_graphs = 1;
@@ -867,7 +866,6 @@ if( ! $opt_X ){  # use XS, unless it was disabled
   }
   open(XS, ">$modfname.xs") || die "Can't create $ext$modpname/$modfname.xs: $!\n";
   if ($opt_x) {
-    require Config;		# Run-time directive
     warn "Scanning typemaps...\n";
     get_typemap();
     my @td;