summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
Diffstat (limited to 'generic')
-rw-r--r--generic/tclFileName.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclFileName.c b/generic/tclFileName.c
index 2024b61..10036c9 100644
--- a/generic/tclFileName.c
+++ b/generic/tclFileName.c
@@ -1558,7 +1558,7 @@ TclDoGlob(interp, separators, headPtr, tail)
Tcl_DStringAppend(headPtr, ":", 1);
}
name = Tcl_DStringValue(headPtr);
- if (access(name, F_OK) == 0) {
+ if (TclAccess(name, F_OK) == 0) {
if ((name[1] != '\0') && (strchr(name+1, ':') == NULL)) {
Tcl_AppendElement(interp, name+1);
} else {
@@ -1589,7 +1589,7 @@ TclDoGlob(interp, separators, headPtr, tail)
}
}
name = Tcl_DStringValue(headPtr);
- exists = (access(name, F_OK) == 0);
+ exists = (TclAccess(name, F_OK) == 0);
for (p = name; *p != '\0'; p++) {
if (*p == '\\') {
*p = '/';
@@ -1609,7 +1609,7 @@ TclDoGlob(interp, separators, headPtr, tail)
}
}
name = Tcl_DStringValue(headPtr);
- if (access(name, F_OK) == 0) {
+ if (TclAccess(name, F_OK) == 0) {
Tcl_AppendElement(interp, name);
}
break;