From: Roderick Schertler <roderick@argon.org>
Date: Sat, 8 Mar 1997 17:22:04 +0000 (-0500)
Subject: @EXPORT_FAIL fix for Exporter.pm
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=a45ab7f640a570b9f6a73e51a29e6396f5854421;p=p5sagit%2Fp5-mst-13.2.git

@EXPORT_FAIL fix for Exporter.pm

The default export_fail method in Exporter.pm needs to drop the first
argument (the class name).

p5p-msgid: 24884.857841724@eeyore.ibcinc.com
---

diff --git a/lib/Exporter.pm b/lib/Exporter.pm
index fd95a7e..abdb1e7 100644
--- 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;
     @_;
 }