diff options
author | dkf <donal.k.fellows@manchester.ac.uk> | 2024-03-19 17:09:30 (GMT) |
---|---|---|
committer | dkf <donal.k.fellows@manchester.ac.uk> | 2024-03-19 17:09:30 (GMT) |
commit | a72c1f969cba896ca61001393f0f7b74fb52e194 (patch) | |
tree | e6fdb6985952e104004323a8b1172733b8f33abf /generic/tclPathObj.c | |
parent | 1f9225ecf514564b9994b7747fbdc7852a321dfa (diff) | |
download | tcl-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.c | 12 |
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; } |