diff options
Diffstat (limited to 'ext/File-Glob')
| -rw-r--r-- | ext/File-Glob/Glob.xs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/ext/File-Glob/Glob.xs b/ext/File-Glob/Glob.xs index 2a9fbb027f..a5f531d68f 100644 --- a/ext/File-Glob/Glob.xs +++ b/ext/File-Glob/Glob.xs @@ -321,6 +321,10 @@ BOOT: { CV *cv = newXS("File::Glob::bsd_glob", XS_File__Glob_doglob, __FILE__); XSANY.any_i32 = 1; +#ifndef PERL_EXTERNAL_GLOB + /* Don’t do this at home! The globhook interface is highly volatile. */ + PL_globhook = csh_glob; +#endif } BOOT: |