X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/cfe65c2e3208a5627c838a187143249612d21576..f01818e214428dd68e3cb9d9c7cead608216ffa5:/ext/File-Glob/Glob.pm diff --git a/ext/File-Glob/Glob.pm b/ext/File-Glob/Glob.pm index 89dd420..ef82389 100644 --- a/ext/File-Glob/Glob.pm +++ b/ext/File-Glob/Glob.pm @@ -71,7 +71,7 @@ if ($^O =~ /^(?:MSWin32|VMS|os2|dos|riscos)$/) { # File::Glob::glob() is deprecated because its prototype is different from # CORE::glob() (use bsd_glob() instead) sub glob { - splice @_, 1; # don't pass PL_glob_index as flags! + splice @_, 1; # no flags goto &bsd_glob; }