@EXPORT_FAIL fix for Exporter.pm

[p5sagit/p5-mst-13.2.git] / lib / Exporter.pm

diff --git a/lib/Exporter.pm b/lib/Exporter.pm
index fd95a7e..abdb1e7 100644 (file)
--- a/lib/Exporter.pm
+++ b/lib/Exporter.pm
@@ -176,6 +176,7 @@ sub export_ok_tags { _push_tags((caller)[0], "EXPORT_OK", \@_) }
 # Default methods
 
 sub export_fail {
+    my $self = shift;
     @_;
 }