summaryrefslogtreecommitdiff
path: root/util.c
diff options
context:
space:
mode:
authorNick Ing-Simmons <nik@tiuk.ti.com>1998-07-18 20:56:58 +0000
committerNick Ing-Simmons <nik@tiuk.ti.com>1998-07-18 20:56:58 +0000
commitb28d0864af067162e2d26cc66b6b8acb6d3cddc8 (patch)
tree1d4129f7ceb5b0a2c9dd4532337b5ea32432988c /util.c
parent62a559b8665e0cfb74dd6a69c48e22412fbdf175 (diff)
downloadperl-b28d0864af067162e2d26cc66b6b8acb6d3cddc8.tar.gz
PL_ scheme Builds under Minw32 - some SEGFAULT snags
p4raw-id: //depot/ansiperl@1537
Diffstat (limited to 'util.c')
-rw-r--r--util.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/util.c b/util.c
index 19487d3679..2a140ee2d9 100644
--- a/util.c
+++ b/util.c
@@ -2477,7 +2477,7 @@ find_script(char *scriptname, bool dosearch, char **search_ext, I32 flags)
#endif
DEBUG_p(PerlIO_printf(Perl_debug_log,
"Looking for %s\n",cur));
- if (PerlLIO_stat(cur,&statbuf) >= 0) {
+ if (PerlLIO_stat(cur,&PL_statbuf) >= 0) {
dosearch = 0;
scriptname = cur;
#ifdef SEARCH_EXTS