summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2022-08-09 06:42:28 -0700
committerKaz Kylheku <kaz@kylheku.com>2022-08-09 06:42:28 -0700
commitd000bc7a8bcbc0c3588c2a31a3b08e43b4dcbf5b (patch)
tree9a1f1ab317b34ceea9674e92054fc66d34395708
parent4fee32da2cc34662b217d89b743d320a7afa470c (diff)
downloadtxr-d000bc7a8bcbc0c3588c2a31a3b08e43b4dcbf5b.tar.gz
txr-d000bc7a8bcbc0c3588c2a31a3b08e43b4dcbf5b.tar.bz2
txr-d000bc7a8bcbc0c3588c2a31a3b08e43b4dcbf5b.zip
load: fix misleading error message.
* parser.c (open_txr_file): Replace "not found" wording with "unable to open" because the diagnostic covers permission errors.
-rw-r--r--parser.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/parser.c b/parser.c
index e8c51f7d..de3307c0 100644
--- a/parser.c
+++ b/parser.c
@@ -658,7 +658,7 @@ except:
if (search_dirs == nil)
#endif
uw_ethrowf(errno_to_file_error(errno),
- lit("~a: ~a not found"), self, *orig_in_resolved_out, nao);
+ lit("~a: unable to open ~a"), self, *orig_in_resolved_out, nao);
try_next = path_cat(pop(&search_dirs), *orig_in_resolved_out);
open_txr_file(try_next, txr_lisp_p, orig_in_resolved_out, stream,
search_dirs, self);