diff options
Diffstat (limited to 'gnu/usr.bin/perl/os2/dl_os2.c')
-rw-r--r-- | gnu/usr.bin/perl/os2/dl_os2.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gnu/usr.bin/perl/os2/dl_os2.c b/gnu/usr.bin/perl/os2/dl_os2.c index 76fa9dc42d9..f15c465f621 100644 --- a/gnu/usr.bin/perl/os2/dl_os2.c +++ b/gnu/usr.bin/perl/os2/dl_os2.c @@ -121,7 +121,7 @@ dlopen(const char *path, int mode) /* Not found. Check for non-FAT name and try truncated name. */ /* Don't know if this helps though... */ for (beg = dot = path + strlen(path); - beg > path && !strchr(":/\\", *(beg-1)); + beg > path && !memCHRs(":/\\", *(beg-1)); beg--) if (*beg == '.') dot = beg; |