From: Jeff Okamoto <okamoto@hpcc123.corp.hp.com>
Date: Fri, 9 May 1997 23:48:20 +0000 (-0700)
Subject: h2xs and @EXPORT_OK
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=f192e801bfe24f1bf6e24b397168a24ce021a5b7;p=p5sagit%2Fp5-mst-13.2.git

h2xs and @EXPORT_OK

Currently, h2xs emits the line:

	use vars qw($VERSION @ISA @EXPORT);

Should @EXPORT_OK also be added to this list?

p5p-msgid: 199705092348.AA057881699@hpcc123.corp.hp.com
---

diff --git a/utils/h2xs.PL b/utils/h2xs.PL
index 6865809..5e22b70 100644
--- a/utils/h2xs.PL
+++ b/utils/h2xs.PL
@@ -395,7 +395,7 @@ END
 if( $opt_X || $opt_c || $opt_A ){
 	# we won't have our own AUTOLOAD(), so won't have $AUTOLOAD
 	print PM <<'END';
-use vars qw($VERSION @ISA @EXPORT);
+use vars qw($VERSION @ISA @EXPORT @EXPORT_OK);
 END
 }
 else{
@@ -403,7 +403,7 @@ else{
 	# will want Carp.
 	print PM <<'END';
 use Carp;
-use vars qw($VERSION @ISA @EXPORT $AUTOLOAD);
+use vars qw($VERSION @ISA @EXPORT @EXPORT_OK $AUTOLOAD);
 END
 }