diff options
| author | hobbs <hobbs@noemail.net> | 2001-08-23 18:20:50 (GMT) |
|---|---|---|
| committer | hobbs <hobbs@noemail.net> | 2001-08-23 18:20:50 (GMT) |
| commit | fc43047a9d7c7b80c10eb0fa1e97045dbef6d7ae (patch) | |
| tree | e95bc01518484622ad51ae701d0f9022d39b0a8e /unix/tclUnixFCmd.c | |
| parent | c27c9fbf8b5c59b5bb7bb4e2a1f590a8f2a2a81f (diff) | |
| download | tcl-fc43047a9d7c7b80c10eb0fa1e97045dbef6d7ae.zip tcl-fc43047a9d7c7b80c10eb0fa1e97045dbef6d7ae.tar.gz tcl-fc43047a9d7c7b80c10eb0fa1e97045dbef6d7ae.tar.bz2 | |
corrected minor compiler warnings
FossilOrigin-Name: 21b1db1afff97ce8d35cbc2467ac4958ca29e838
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); |