summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorsuresh <suresh>1998-05-20 17:10:52 (GMT)
committersuresh <suresh>1998-05-20 17:10:52 (GMT)
commit9218425ba91dd9538d06db7a4d55e907737bd29e (patch)
tree1eeea5e9bcb7ae7f779409586c5ef82c7113db65
parent8a4a4e3743796d8d1d39d682be5887e1ca9425c0 (diff)
downloadtcl-9218425ba91dd9538d06db7a4d55e907737bd29e.zip
tcl-9218425ba91dd9538d06db7a4d55e907737bd29e.tar.gz
tcl-9218425ba91dd9538d06db7a4d55e907737bd29e.tar.bz2
Changed call ref's from 'access(...)' to 'TclAccess(...)'.
-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;