File::Glob: Don’t use the magic 2nd arg to glob

[perl5.git] / ext / File-Glob / Glob.pm

diff --git a/ext/File-Glob/Glob.pm b/ext/File-Glob/Glob.pm
index 89dd420..ef82389 100644 (file)
--- 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;
 }