summaryrefslogtreecommitdiffstats
path: root/generic/tclFCmd.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2023-03-27 11:35:58 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2023-03-27 11:35:58 (GMT)
commit2524a62bb6b65a0b183dc413dd13ebbae997a537 (patch)
treee07480f444291b0f919a44dcc9156e168850719a /generic/tclFCmd.c
parent587c1ebdba4cb0f92dcd91478ce711833552fd48 (diff)
downloadtcl-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.c2
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;
}