From: Hugo van der Sanden <hv@crypt.org>
Date: Thu, 24 Feb 2000 13:24:10 +0000 (+0000)
Subject: double EXPORT_OK in h2xs
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=aba054787d21be4f8e2f26819be88cdbe3e7bbd8;p=p5sagit%2Fp5-mst-13.2.git

double EXPORT_OK in h2xs

To: perl5-porters@perl.org
Message-Id: <200002241324.NAA05900@crypt.compulink.co.uk>

p4raw-id: //depot/cfgperl@5236
---

diff --git a/utils/h2xs.PL b/utils/h2xs.PL
index 76e2d65..c47418e 100644
--- a/utils/h2xs.PL
+++ b/utils/h2xs.PL
@@ -634,18 +634,11 @@ require 5.005_62;
 use strict;
 END
 
-if( $opt_X || $opt_c || $opt_A ){
-	# we won't have our own AUTOLOAD(), so won't have $AUTOLOAD
-	print PM <<'END';
-our @EXPORT_OK;
-END
-}
-else{
+unless( $opt_X || $opt_c || $opt_A ){
 	# we'll have an AUTOLOAD(), and it will have $AUTOLOAD and
 	# will want Carp.
 	print PM <<'END';
 use Carp;
-our @EXPORT_OK;
 END
 }