This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Leaner exporter
[perl5.git] / lib / Exporter / Heavy.pm
index d1c4a10..3bdc4b4 100644 (file)
@@ -215,11 +215,18 @@ sub _push_tags {
     }
 }
 
-
-sub require_version {
+sub heavy_require_version {
     my($self, $wanted) = @_;
     my $pkg = ref $self || $self;
     return ${pkg}->VERSION($wanted);
 }
 
+sub heavy_export_tags {
+  _push_tags((caller)[0], "EXPORT",    \@_);
+}
+
+sub heavy_export_ok_tags {
+  _push_tags((caller)[0], "EXPORT_OK", \@_);
+}
+
 1;