diff options
| author | Jeff Okamoto <okamoto@hpcc123.corp.hp.com> | 1997-05-09 16:48:20 -0700 |
|---|---|---|
| committer | Chip Salzenberg <chip@atlantic.net> | 1997-05-16 10:15:00 +1200 |
| commit | f192e801bfe24f1bf6e24b397168a24ce021a5b7 (patch) | |
| tree | 7c361aa42abf915b364105a9e118480cc3540a66 /utils/h2xs.PL | |
| parent | df8c8771ccb7761fbad9e6985c60a1d65491a7ab (diff) | |
| download | perl-f192e801bfe24f1bf6e24b397168a24ce021a5b7.tar.gz | |
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
Diffstat (limited to 'utils/h2xs.PL')
| -rw-r--r-- | utils/h2xs.PL | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/utils/h2xs.PL b/utils/h2xs.PL index 686580918b..5e22b7096e 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 } |