diff options
| author | Roderick Schertler <roderick@argon.org> | 1997-03-08 12:22:04 -0500 |
|---|---|---|
| committer | Chip Salzenberg <chip@atlantic.net> | 1997-03-07 04:01:12 +1200 |
| commit | a45ab7f640a570b9f6a73e51a29e6396f5854421 (patch) | |
| tree | db628f5a227e914e1ced3db2ae3f2b673537ec76 | |
| parent | d43563dda8f974d66e255d10af6e34c09bb46cb4 (diff) | |
| download | perl-a45ab7f640a570b9f6a73e51a29e6396f5854421.tar.gz | |
@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
| -rw-r--r-- | lib/Exporter.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lib/Exporter.pm b/lib/Exporter.pm index fd95a7efef..abdb1e788b 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; @_; } |