diff options
| author | rjohnson <rjohnson> | 1999-04-21 21:50:22 (GMT) |
|---|---|---|
| committer | rjohnson <rjohnson> | 1999-04-21 21:50:22 (GMT) |
| commit | 1df32a4d2cd7f7221d1e1310817ee0af71057111 (patch) | |
| tree | 052e39d4c88db47521c59ebe5546302186a5022f /generic/tclFCmd.c | |
| parent | d2a3e887caf524096070bbe8667b700520357b4b (diff) | |
| download | tcl-1df32a4d2cd7f7221d1e1310817ee0af71057111.zip tcl-1df32a4d2cd7f7221d1e1310817ee0af71057111.tar.gz tcl-1df32a4d2cd7f7221d1e1310817ee0af71057111.tar.bz2 | |
Resynced with mainline.
Diffstat (limited to 'generic/tclFCmd.c')
| -rw-r--r-- | generic/tclFCmd.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclFCmd.c b/generic/tclFCmd.c index b69358b..32c7186 100644 --- a/generic/tclFCmd.c +++ b/generic/tclFCmd.c @@ -9,7 +9,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclFCmd.c,v 1.4 1999/04/16 00:46:46 stanton Exp $ + * RCS: @(#) $Id: tclFCmd.c,v 1.5 1999/04/21 21:50:25 rjohnson Exp $ */ #include "tclInt.h" @@ -172,7 +172,7 @@ FileCopyRename(interp, argc, argv, copyFlag) * Move each source file into target directory. Extract the basename * from each source, and append it to the end of the target path. */ - + for ( ; i < argc - 1; i++) { char *jargv[2]; char *source, *newFileName; @@ -432,7 +432,7 @@ CopyRenameOneFile(interp, source, target, copyFlag, force) Tcl_DString sourcePath, targetPath, errorBuffer; char *targetName, *sourceName, *errfile; struct stat sourceStatBuf, targetStatBuf; - + sourceName = Tcl_TranslateFileName(interp, source, &sourcePath); if (sourceName == NULL) { return TCL_ERROR; |