add :ALL export tag (from Chris Nandor <pudge@pobox.com>)

p4raw-id: //depot/perl@4163

diff --git a/lib/File/Spec/Functions.pm b/lib/File/Spec/Functions.pm
index ffc1199..140738f 100644 (file)
--- a/lib/File/Spec/Functions.pm
+++ b/lib/File/Spec/Functions.pm
@@ -3,7 +3,7 @@ package File::Spec::Functions;
 use File::Spec;
 use strict;
 
-use vars qw(@ISA @EXPORT @EXPORT_OK);
+use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
 
 require Exporter;
 
@@ -31,6 +31,8 @@ require Exporter;
        rel2abs
 );
 
+%EXPORT_TAGS = ( ALL => [ @EXPORT_OK, @EXPORT ] );
+
 foreach my $meth (@EXPORT, @EXPORT_OK) {
     my $sub = File::Spec->can($meth);
     no strict 'refs';
@@ -85,6 +87,8 @@ The following functions are exported only by request.
        abs2rel
        rel2abs
 
+All the functions may be imported using the C<:ALL> tag.
+
 =head1 SEE ALSO
 
 File::Spec, File::Spec::Unix, File::Spec::Mac, File::Spec::OS2,