diff options
| author | Nicholas Clark <nick@ccl4.org> | 2010-10-15 11:29:53 +0100 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2010-10-15 11:29:53 +0100 |
| commit | aa0c903bd5e6e956eecfafc7bbbbcba3f6c2a55f (patch) | |
| tree | 9d0555e7bf636212c5b3f230571117af80e410b9 | |
| parent | b84cd0b10c0ff4f2e533b112c9ffa37cc778f556 (diff) | |
| download | perl-aa0c903bd5e6e956eecfafc7bbbbcba3f6c2a55f.tar.gz | |
Express @File::Glob::EXPORT_OK in terms of %File::Glob::EXPORT_TAGS.
This reduces duplication.
| -rw-r--r-- | ext/File-Glob/Glob.pm | 24 |
1 files changed, 2 insertions, 22 deletions
diff --git a/ext/File-Glob/Glob.pm b/ext/File-Glob/Glob.pm index 51c36b36d7..6fc06fa838 100644 --- a/ext/File-Glob/Glob.pm +++ b/ext/File-Glob/Glob.pm @@ -11,28 +11,6 @@ require XSLoader; # NOTE: The glob() export is only here for compatibility with 5.6.0. # csh_glob() should not be used directly, unless you know what you're doing. -@EXPORT_OK = qw( - csh_glob - bsd_glob - glob - GLOB_ABEND - GLOB_ALPHASORT - GLOB_ALTDIRFUNC - GLOB_BRACE - GLOB_CSH - GLOB_ERR - GLOB_ERROR - GLOB_LIMIT - GLOB_MARK - GLOB_NOCASE - GLOB_NOCHECK - GLOB_NOMAGIC - GLOB_NOSORT - GLOB_NOSPACE - GLOB_QUOTE - GLOB_TILDE -); - %EXPORT_TAGS = ( 'glob' => [ qw( GLOB_ABEND @@ -56,6 +34,8 @@ require XSLoader; ) ], ); +@EXPORT_OK = (@{$EXPORT_TAGS{'glob'}}, 'csh_glob'); + $VERSION = '1.09'; sub import { |