summaryrefslogtreecommitdiff
path: root/win32/win32.c
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>1998-09-27 03:38:55 +0000
committerGurusamy Sarathy <gsar@cpan.org>1998-09-27 03:38:55 +0000
commit69d3ab133c321a38d88e8bc9e3dd36034314f7b4 (patch)
treef92293ff0831b50ba54355cb6120280a987fb8bd /win32/win32.c
parent24caa93f50e1f4f416dac288b4fd89a65015bad9 (diff)
downloadperl-69d3ab133c321a38d88e8bc9e3dd36034314f7b4.tar.gz
small tweak on last change
p4raw-id: //depot/perl@1896
Diffstat (limited to 'win32/win32.c')
-rw-r--r--win32/win32.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/win32/win32.c b/win32/win32.c
index aecab617e4..8497b676b4 100644
--- a/win32/win32.c
+++ b/win32/win32.c
@@ -636,7 +636,7 @@ win32_opendir(char *filename)
return NULL;
/* check to see if filename is a directory */
- if (win32_stat(filename, &sbuf) < 0)
+ if (win32_stat(filename, &sbuf) < 0 || !S_ISDIR(sbuf.st_mode))
return NULL;
/* Get us a DIR structure */