diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-07-07 20:38:54 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-07-07 20:38:54 (GMT) |
| commit | d6fda47fa83529c59f32df1e8ba6541d58f83bd9 (patch) | |
| tree | 98a92fab70d068cbf27a878c3287df3919249f94 /generic/tclIOUtil.c | |
| parent | 3e181ede9d6b4c3b54b754325910abbe7fe66212 (diff) | |
| parent | b02bf2903655487dd351643830a50035ffb4aecd (diff) | |
| download | tcl-d6fda47fa83529c59f32df1e8ba6541d58f83bd9.zip tcl-d6fda47fa83529c59f32df1e8ba6541d58f83bd9.tar.gz tcl-d6fda47fa83529c59f32df1e8ba6541d58f83bd9.tar.bz2 | |
Merge 8.7, and a few tweaks: Only provide Tcl_WinUtfToTChar on Tcl 8.x, not on 9.0 any more
Diffstat (limited to 'generic/tclIOUtil.c')
| -rw-r--r-- | generic/tclIOUtil.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/generic/tclIOUtil.c b/generic/tclIOUtil.c index 4b3eaa5..80cd8db 100644 --- a/generic/tclIOUtil.c +++ b/generic/tclIOUtil.c @@ -327,9 +327,9 @@ Tcl_Stat( oldStyleBuf->st_uid = buf.st_uid; oldStyleBuf->st_gid = buf.st_gid; oldStyleBuf->st_size = (off_t) buf.st_size; - oldStyleBuf->st_atime = buf.st_atime; - oldStyleBuf->st_mtime = buf.st_mtime; - oldStyleBuf->st_ctime = buf.st_ctime; + oldStyleBuf->st_atime = Tcl_GetAccessTimeFromStat(&buf); + oldStyleBuf->st_mtime = Tcl_GetModificationTimeFromStat(&buf); + oldStyleBuf->st_ctime = Tcl_GetChangeTimeFromStat(&buf); #ifdef HAVE_STRUCT_STAT_ST_BLKSIZE oldStyleBuf->st_blksize = buf.st_blksize; #endif @@ -4422,8 +4422,8 @@ TclCrossFilesystemCopy( */ if (Tcl_FSLstat(source, &sourceStatBuf) == 0) { - tval.actime = sourceStatBuf.st_atime; - tval.modtime = sourceStatBuf.st_mtime; + tval.actime = Tcl_GetAccessTimeFromStat(&sourceStatBuf); + tval.modtime = Tcl_GetModificationTimeFromStat(&sourceStatBuf); Tcl_FSUtime(target, &tval); } |