diff options
| author | hobbs <hobbs> | 2001-08-23 18:20:50 (GMT) |
|---|---|---|
| committer | hobbs <hobbs> | 2001-08-23 18:20:50 (GMT) |
| commit | d47a11a41d9e4135a144e498ff673ff43c5057d9 (patch) | |
| tree | e95bc01518484622ad51ae701d0f9022d39b0a8e /unix/tclUnixFCmd.c | |
| parent | f319c32167c2c52995fe53b438ef4bc34e9a4914 (diff) | |
| download | tcl-d47a11a41d9e4135a144e498ff673ff43c5057d9.zip tcl-d47a11a41d9e4135a144e498ff673ff43c5057d9.tar.gz tcl-d47a11a41d9e4135a144e498ff673ff43c5057d9.tar.bz2 | |
corrected minor compiler warnings
Diffstat (limited to 'unix/tclUnixFCmd.c')
| -rw-r--r-- | unix/tclUnixFCmd.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/unix/tclUnixFCmd.c b/unix/tclUnixFCmd.c index 223f373..23eeda6 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. * - * RCS: @(#) $Id: tclUnixFCmd.c,v 1.9 2001/08/23 17:37:08 vincentdarley Exp $ + * RCS: @(#) $Id: tclUnixFCmd.c,v 1.10 2001/08/23 18:20:50 hobbs Exp $ * * Portions of this code were derived from NetBSD source code which has * the following copyright notice: @@ -1417,7 +1417,6 @@ SetPermissionsAttribute(interp, objIndex, fileName, attributePtr) if (Tcl_GetLongFromObj(NULL, attributePtr, &mode) == TCL_OK) { newMode = (mode_t) (mode & 0x00007FFF); } else { - Tcl_DString ds; struct stat buf; char *modeStringPtr = Tcl_GetString(attributePtr); |