diff options
| author | stanton <stanton> | 1998-09-24 23:58:14 (GMT) |
|---|---|---|
| committer | stanton <stanton> | 1998-09-24 23:58:14 (GMT) |
| commit | 9995355714bc90faf7c2e345b3d6a1d041447097 (patch) | |
| tree | 2ad97c5b1994495118cef4df947cf16b55e326f2 /unix/tclUnixFCmd.c | |
| parent | e13392595faf8e8d0d1c3c514ce160cfadc3d372 (diff) | |
| download | tcl-9995355714bc90faf7c2e345b3d6a1d041447097.zip tcl-9995355714bc90faf7c2e345b3d6a1d041447097.tar.gz tcl-9995355714bc90faf7c2e345b3d6a1d041447097.tar.bz2 | |
merging changes from 8.0.3 into 8.1a2
Diffstat (limited to 'unix/tclUnixFCmd.c')
| -rw-r--r-- | unix/tclUnixFCmd.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/unix/tclUnixFCmd.c b/unix/tclUnixFCmd.c index 83f4bfb..cbcab04 100644 --- a/unix/tclUnixFCmd.c +++ b/unix/tclUnixFCmd.c @@ -10,7 +10,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * SCCS: @(#) tclUnixFCmd.c 1.36 98/02/18 18:24:52 + * RCS: @(#) $Id: tclUnixFCmd.c,v 1.1.2.2 1998/09/24 23:59:45 stanton Exp $ * * Portions of this code were derived from NetBSD source code which has * the following copyright notice: @@ -1070,7 +1070,7 @@ GetGroupAttribute(interp, objIndex, fileName, attributePtrPtr) int result; native = Tcl_UtfToExternalDString(NULL, fileName, -1, &ds); - result = stat(native, &statBuf); /* INTL: Native. */ + result = TclStat(native, &statBuf); /* INTL: Native. */ Tcl_DStringFree(&ds); if (result != 0) { @@ -1122,7 +1122,7 @@ GetOwnerAttribute(interp, objIndex, fileName, attributePtrPtr) int result; native = Tcl_UtfToExternalDString(NULL, fileName, -1, &ds); - result = stat(native, &statBuf); /* INTL: Native. */ + result = TclStat(native, &statBuf); /* INTL: Native. */ Tcl_DStringFree(&ds); if (result != 0) { @@ -1174,7 +1174,7 @@ GetPermissionsAttribute(interp, objIndex, fileName, attributePtrPtr) int result; native = Tcl_UtfToExternalDString(NULL, fileName, -1, &ds); - result = stat(native, &statBuf); /* INTL: Native. */ + result = TclStat(native, &statBuf); /* INTL: Native. */ Tcl_DStringFree(&ds); if (result != 0) { |