summaryrefslogtreecommitdiffstats
path: root/sysif.c
diff options
context:
space:
mode:
Diffstat (limited to 'sysif.c')
-rw-r--r--sysif.c11
1 files changed, 9 insertions, 2 deletions
diff --git a/sysif.c b/sysif.c
index d117729b..4f5da7c5 100644
--- a/sysif.c
+++ b/sysif.c
@@ -713,8 +713,15 @@ inval:
if (err < 0) {
int eno = errno;
- uw_throwf(errno_to_file_error(eno), lit("~a ~a #o~o: ~d/~s"),
- self, target, mode, num(eno), string_utf8(strerror(eno)), nao);
+ val error = errno_to_file_error(eno);
+ val errstr = string_utf8(strerror(eno));
+
+ if (stringp(mode))
+ uw_throwf(error, lit("~a ~a ~a: ~d/~s"),
+ self, target, mode, num(eno), errstr, nao);
+ else
+ uw_throwf(error, lit("~a ~a #o~o: ~d/~s"),
+ self, target, mode, num(eno), errstr, nao);
}
return t;