This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Glob.xs: Remove comment
[perl5.git] / ext / File-Glob / Glob.xs
index 1171769..a4c9bd7 100644 (file)
@@ -61,7 +61,6 @@ doglob(pTHX_ const char *pattern, int flags)
     }
 }
 
     }
 }
 
-/* borrowed heavily from gsar's File::DosGlob, but translated into C */
 static void
 iterate(pTHX_ bool(*globber)(pTHX_ SV *entries, SV *patsv))
 {
 static void
 iterate(pTHX_ bool(*globber)(pTHX_ SV *entries, SV *patsv))
 {