diff options
Diffstat (limited to 'ext/File/Glob/Glob.pm')
-rw-r--r-- | ext/File/Glob/Glob.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/ext/File/Glob/Glob.pm b/ext/File/Glob/Glob.pm index f703a0b183..3c3ea6c1f2 100644 --- a/ext/File/Glob/Glob.pm +++ b/ext/File/Glob/Glob.pm @@ -109,7 +109,9 @@ if ($^O =~ /^(?:MSWin32|VMS|os2|dos|riscos|MacOS)$/) { # Autoload methods go after =cut, and are processed by the autosplit program. sub glob { - return doglob(@_); + my ($pat,$flags) = @_; + $flags = $DEFAULT_FLAGS if @_ < 2; + return doglob($pat,$flags); } ## borrowed heavily from gsar's File::DosGlob |