diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-03-07 20:13:24 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-03-07 20:13:24 (GMT) |
| commit | 73229a7e53190161f9fac4c02158d6a20645eab0 (patch) | |
| tree | 741cf370f0a04a846db70ed678808dc7c7cf9026 /unix/tclUnixFCmd.c | |
| parent | f4618fc2d91563021eaec2308d4c7ff326e4e0e7 (diff) | |
| parent | 9aea48988c29a181e815be248de624c7bf29d5bc (diff) | |
| download | tcl-73229a7e53190161f9fac4c02158d6a20645eab0.zip tcl-73229a7e53190161f9fac4c02158d6a20645eab0.tar.gz tcl-73229a7e53190161f9fac4c02158d6a20645eab0.tar.bz2 | |
Merge 9.0
Diffstat (limited to 'unix/tclUnixFCmd.c')
| -rw-r--r-- | unix/tclUnixFCmd.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/unix/tclUnixFCmd.c b/unix/tclUnixFCmd.c index 7753cec..b8911df 100644 --- a/unix/tclUnixFCmd.c +++ b/unix/tclUnixFCmd.c @@ -1648,7 +1648,7 @@ SetPermissionsAttribute( Tcl_Obj *modeObj; TclNewLiteralStringObj(modeObj, "0o"); - Tcl_AppendToObj(modeObj, modeStringPtr+scanned+1, -1); + Tcl_AppendToObj(modeObj, modeStringPtr+scanned+1, TCL_INDEX_NONE); result = Tcl_GetWideIntFromObj(NULL, modeObj, &mode); Tcl_DecrRefCount(modeObj); } |