diff options
| author | James E Keenan <jkeenan@cpan.org> | 2018-10-17 16:22:43 -0400 |
|---|---|---|
| committer | James E Keenan <jkeenan@cpan.org> | 2018-10-17 18:38:00 -0400 |
| commit | a15e41c213bf763e1770580fc3e0aa476070261f (patch) | |
| tree | ca729d38793bb15c5f18e3a2157ab23fbe2cba47 /ext | |
| parent | fb1ab119d45424c20269bacd0dada91318c5515f (diff) | |
| download | perl-a15e41c213bf763e1770580fc3e0aa476070261f.tar.gz | |
Use bsd_glob() instead of glob().
Two instances of glob() which run on MSWin32 were overlooked in commit
df8b709bfcaea9932dd434f18393bfcb4e3d5568.
Thanks to Christian Walde for Win32 smoke testing and assistance in diagnosis.
Diffstat (limited to 'ext')
| -rw-r--r-- | ext/File-Glob/t/case.t | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ext/File-Glob/t/case.t b/ext/File-Glob/t/case.t index 6362ef0586..5d8e011688 100644 --- a/ext/File-Glob/t/case.t +++ b/ext/File-Glob/t/case.t @@ -34,10 +34,10 @@ cmp_ok(scalar @a, '>=', 3, 'explicit use of the GLOB_NOCASE flag'); SKIP: { skip 'Not Win32 or NetWare', 3 unless $^O eq 'MSWin32' || $^O eq 'NetWare'; - @a = File::Glob::glob("op\\g*.t"); + @a = File::Glob::bsd_glob("op\\g*.t"); cmp_ok(scalar @a, '>=', 8); mkdir "[]", 0; - @a = File::Glob::glob("\\[\\]", GLOB_QUOTE); + @a = File::Glob::bsd_glob("\\[\\]", GLOB_QUOTE); rmdir "[]"; is(scalar @a, 1); @a = bsd_glob("op\\*", GLOB_QUOTE); |