diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2023-05-24 16:02:24 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2023-05-24 16:02:24 (GMT) |
| commit | 29225e440c7dfc3b4fb54d8bb5a8b32fd9604d6f (patch) | |
| tree | 76a21d1b72f69d7f7218eb0332f9d2afbed472d5 /unix/tclUnixFCmd.c | |
| parent | 4a3c559932945a74fed481561274ceedc4afe555 (diff) | |
| parent | 70a3d08fc4eb639c20c5613ea5952a0dfdd5e935 (diff) | |
| download | tcl-29225e440c7dfc3b4fb54d8bb5a8b32fd9604d6f.zip tcl-29225e440c7dfc3b4fb54d8bb5a8b32fd9604d6f.tar.gz tcl-29225e440c7dfc3b4fb54d8bb5a8b32fd9604d6f.tar.bz2 | |
merge core-8-branch
Diffstat (limited to 'unix/tclUnixFCmd.c')
| -rw-r--r-- | unix/tclUnixFCmd.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/unix/tclUnixFCmd.c b/unix/tclUnixFCmd.c index 818209d..f8eaeb5 100644 --- a/unix/tclUnixFCmd.c +++ b/unix/tclUnixFCmd.c @@ -1,7 +1,7 @@ /* * tclUnixFCmd.c * - * This file implements the unix specific portion of file manipulation + * This file implements the Unix specific portion of file manipulation * subcommands of the "file" command. All filename arguments should * already be translated to native format. * @@ -340,7 +340,7 @@ DoRenameFile( } /* - * IRIX returns EIO when you attept to move a directory into itself. We + * IRIX returns EIO when you attempt to move a directory into itself. We * just map EIO to EINVAL get the right message on SGI. Most platforms * don't return EIO except in really strange cases. */ @@ -730,7 +730,7 @@ DoCreateDirectory( * * Recursively copies a directory. The target directory dst must not * already exist. Note that this function does not merge two directory - * hierarchies, even if the target directory is an an empty directory. + * hierarchies, even if the target directory is an empty directory. * * Results: * If the directory was successfully copied, returns TCL_OK. Otherwise @@ -1422,7 +1422,7 @@ GetOwnerAttribute( Tcl_DString ds; (void) Tcl_ExternalToUtfDString(NULL, pwPtr->pw_name, TCL_INDEX_NONE, &ds); - *attributePtrPtr = TclDStringToObj(&ds); + *attributePtrPtr = Tcl_DStringToObj(&ds); } return TCL_OK; } @@ -2339,7 +2339,7 @@ TclpCreateTemporaryDirectory( Tcl_ExternalToUtfDString(NULL, Tcl_DStringValue(&templ), Tcl_DStringLength(&templ), &tmp); Tcl_DStringFree(&templ); - return TclDStringToObj(&tmp); + return Tcl_DStringToObj(&tmp); } #if defined(__CYGWIN__) |