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 (file)
--- 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;