fix the perl -V breakage

To: Jarkko Hietaniemi <jhi@iki.fi>
Cc: "John L. Allen" <allen@grumman.com>, perl5-porters@perl.org,
       	gsar@activestate.com
Subject: Re: Follow up to: _58 on AIX 431
Message-ID: <19990727174200.A12775@monk.mps.ohio-state.edu>

p4raw-id: //depot/perl@3806

diff --git a/configpm b/configpm
index 66b51a4..8c53dbb 100755 (executable)
--- a/configpm
+++ b/configpm
@@ -30,6 +30,7 @@ sub import {
   my $pkg = shift;
   @_ = @EXPORT unless @_;
   my @func = grep {$_ ne '%Config'} @_;
+  local $Exporter::ExportLevel = 1;
   Exporter::import('Config', @func) if @func;
   return if @func == @_;
   my $callpkg = caller(0);