diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-03-27 11:35:58 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-03-27 11:35:58 (GMT) |
commit | 2524a62bb6b65a0b183dc413dd13ebbae997a537 (patch) | |
tree | e07480f444291b0f919a44dcc9156e168850719a /generic/tclFCmd.c | |
parent | 587c1ebdba4cb0f92dcd91478ce711833552fd48 (diff) | |
download | tcl-2524a62bb6b65a0b183dc413dd13ebbae997a537.zip tcl-2524a62bb6b65a0b183dc413dd13ebbae997a537.tar.gz tcl-2524a62bb6b65a0b183dc413dd13ebbae997a537.tar.bz2 |
More (internal) usage of TclGetString() and TclGetStringFromObj() macro's
Diffstat (limited to 'generic/tclFCmd.c')
-rw-r--r-- | generic/tclFCmd.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclFCmd.c b/generic/tclFCmd.c index ea8f715..bfc3f43 100644 --- a/generic/tclFCmd.c +++ b/generic/tclFCmd.c @@ -1679,7 +1679,7 @@ TclFileHomeCmd( Tcl_WrongNumArgs(interp, 1, objv, "?user?"); return TCL_ERROR; } - homeDirObj = TclGetHomeDirObj(interp, objc == 1 ? NULL : Tcl_GetString(objv[1])); + homeDirObj = TclGetHomeDirObj(interp, objc == 1 ? NULL : TclGetString(objv[1])); if (homeDirObj == NULL) { return TCL_ERROR; } |