use Config; use Config; require Config;
authorMichael G. Schwern <schwern@pobox.com>
Sun, 3 Mar 2002 13:33:28 +0000 (08:33 -0500)
committerAbhijit Menon-Sen <ams@wiw.org>
Sun, 3 Mar 2002 18:06:32 +0000 (18:06 +0000)
   Message-Id: <20020303183328.GA3296@blackrider>

p4raw-id: //depot/perl@14966

utils/h2xs.PL

index a18dac6..f1762c9 100644 (file)
@@ -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;