diff options
author | vincentdarley <vincentdarley@noemail.net> | 2002-03-24 11:41:48 (GMT) |
---|---|---|
committer | vincentdarley <vincentdarley@noemail.net> | 2002-03-24 11:41:48 (GMT) |
commit | 2a347a34ce846bb9800016e1bca34a0b552ba6e2 (patch) | |
tree | 9e9a209ca39c12dd8d45b40c876c1478bd022c1a /generic/tclFCmd.c | |
parent | 6393b8117ff90cb65bd9a34cf4245083883bdc4b (diff) | |
download | tcl-2a347a34ce846bb9800016e1bca34a0b552ba6e2.zip tcl-2a347a34ce846bb9800016e1bca34a0b552ba6e2.tar.gz tcl-2a347a34ce846bb9800016e1bca34a0b552ba6e2.tar.bz2 |
4 fs fixes
FossilOrigin-Name: d33368661952a4384e657612e1b3b49a2bd6b278
Diffstat (limited to 'generic/tclFCmd.c')
-rw-r--r-- | generic/tclFCmd.c | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/generic/tclFCmd.c b/generic/tclFCmd.c index 61d4df2..cc920ce 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.16 2002/02/15 14:28:49 dkf Exp $ + * RCS: @(#) $Id: tclFCmd.c,v 1.17 2002/03/24 11:41:50 vincentdarley Exp $ */ #include "tclInt.h" @@ -716,10 +716,9 @@ FileForceOption(interp, objc, objv, forcePtr) * if path is the root directory, returns no characters. * * Results: - * Appends the string that represents the basename to the end of - * the specified initialized DString, returning a pointer to the - * resulting string. If there is an error, an error message is left - * in interp, NULL is returned, and the Tcl_DString is unmodified. + * Returns the string object that represents the basename. If there + * is an error, an error message is left in interp, and NULL is + * returned. * * Side effects: * None. |