From cf5e532c69ddafda91c25e6f58aedfc3ae0a2058 Mon Sep 17 00:00:00 2001 From: Steve Bennett Date: Sat, 18 Apr 2020 16:06:23 +1000 Subject: file readlink: change error message to match Tcl Signed-off-by: Steve Bennett --- jim-file.c | 2 +- tests/file.test | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/jim-file.c b/jim-file.c index 49bd331..dabda90 100644 --- a/jim-file.c +++ b/jim-file.c @@ -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 -- cgit v1.1