diff options
author | Steve Bennett <steveb@workware.net.au> | 2020-04-18 16:06:23 +1000 |
---|---|---|
committer | Steve Bennett <steveb@workware.net.au> | 2020-05-04 21:57:37 +1000 |
commit | cf5e532c69ddafda91c25e6f58aedfc3ae0a2058 (patch) | |
tree | 8045a56558a03471b50e710ba7986cb34f5127e7 | |
parent | 6b7b6b8c9fb6c203e99847a1114825504599b9f9 (diff) | |
download | jimtcl-cf5e532c69ddafda91c25e6f58aedfc3ae0a2058.zip jimtcl-cf5e532c69ddafda91c25e6f58aedfc3ae0a2058.tar.gz jimtcl-cf5e532c69ddafda91c25e6f58aedfc3ae0a2058.tar.bz2 |
file readlink: change error message to match Tcl
Signed-off-by: Steve Bennett <steveb@workware.net.au>
-rw-r--r-- | jim-file.c | 2 | ||||
-rw-r--r-- | tests/file.test | 2 |
2 files changed, 2 insertions, 2 deletions
@@ -816,7 +816,7 @@ static int file_cmd_readlink(Jim_Interp *interp, int argc, Jim_Obj *const *argv) if (linkLength == -1) { Jim_Free(linkValue); - Jim_SetResultFormatted(interp, "couldn't readlink \"%#s\": %s", argv[0], strerror(errno)); + Jim_SetResultFormatted(interp, "could not read link \"%#s\": %s", argv[0], strerror(errno)); return JIM_ERR; } linkValue[linkLength] = 0; diff --git a/tests/file.test b/tests/file.test index f279206..73eb481 100644 --- a/tests/file.test +++ b/tests/file.test @@ -282,7 +282,7 @@ test link-1.4 {file sym link} -constraints filelink -body { test link-1.5 {file readlink, bad link} -constraints filelink -body { file readlink [info script] -} -returnCodes error -match glob -result {could*read*link "*file.test": *} +} -returnCodes error -match glob -result {could not read*link "*file.test": *} test link-1.6 {file link badopt} -constraints filelink -body { file link -bad name1 name2 |