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)
commita72c1f969cba896ca61001393f0f7b74fb52e194 (patch)
treee6fdb6985952e104004323a8b1172733b8f33abf /generic/tclPathObj.c
parent1f9225ecf514564b9994b7747fbdc7852a321dfa (diff)
downloadtcl-a72c1f969cba896ca61001393f0f7b74fb52e194.zip
tcl-a72c1f969cba896ca61001393f0f7b74fb52e194.tar.gz
tcl-a72c1f969cba896ca61001393f0f7b74fb52e194.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;
}