summaryrefslogtreecommitdiffstats
path: root/generic/tclPathObj.c
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2024-03-19 17:09:30 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2024-03-19 17:09:30 (GMT)
commit3ba2524ad4dcbada77fd5079cb69007cdea2a5e9 (patch)
treee6fdb6985952e104004323a8b1172733b8f33abf /generic/tclPathObj.c
parentd93e68c4e796434fb11ea9c067c73dbb483fd6dd (diff)
downloadtcl-3ba2524ad4dcbada77fd5079cb69007cdea2a5e9.zip
tcl-3ba2524ad4dcbada77fd5079cb69007cdea2a5e9.tar.gz
tcl-3ba2524ad4dcbada77fd5079cb69007cdea2a5e9.tar.bz2
more spacing/formatting tweaks
Diffstat (limited to 'generic/tclPathObj.c')
-rw-r--r--generic/tclPathObj.c12
1 files changed, 6 insertions, 6 deletions
diff --git a/generic/tclPathObj.c b/generic/tclPathObj.c
index 9dc0583..0d5552b 100644
--- a/generic/tclPathObj.c
+++ b/generic/tclPathObj.c
@@ -2474,7 +2474,7 @@ MakeTildeRelativePath(
const char *user, /* User name. NULL -> current user */
const char *subPath, /* Rest of path. May be NULL */
Tcl_DString *dsPtr) /* Output. Is initialized by the function. Must be
- freed on success */
+ * freed on success */
{
const char *dir;
Tcl_DString dirString;
@@ -2489,10 +2489,10 @@ MakeTildeRelativePath(
if (dir == NULL) {
if (interp) {
Tcl_SetObjResult(interp, Tcl_NewStringObj(
- "couldn't find HOME environment variable to"
- " expand path", -1));
+ "couldn't find HOME environment variable to expand path",
+ -1));
Tcl_SetErrorCode(interp, "TCL", "VALUE", "PATH",
- "HOMELESS", (void *)NULL);
+ "HOMELESS", (void *)NULL);
}
return TCL_ERROR;
}
@@ -2502,9 +2502,9 @@ MakeTildeRelativePath(
if (dir == NULL) {
if (interp != NULL) {
Tcl_SetObjResult(interp, Tcl_ObjPrintf(
- "user \"%s\" doesn't exist", user));
+ "user \"%s\" doesn't exist", user));
Tcl_SetErrorCode(interp, "TCL", "VALUE", "PATH", "NOUSER",
- (void *)NULL);
+ (void *)NULL);
}
return TCL_ERROR;
}