~ruther/guix-local: syscalls: 'opendir*' error message shows the file name.

3bacc655c5fd988f0199ef259adcb4fb3754042e — Ludovic Courtès 9 years ago 01049bb

syscalls: 'opendir*' error message shows the file name.

* guix/build/syscalls.scm (opendir*): Add NAME to the 'system-error'
message.

patch browse .tar.gz .zip

1 files changed, 1 insertions(+), 2 deletions(-)

M guix/build/syscalls.scm

M guix/build/syscalls.scm => guix/build/syscalls.scm +1 -2

@@ 870,8 870,7 @@ system to PUT-OLD."
                     (proc (string->pointer name))))
         (if (null-pointer? ptr)
             (throw 'system-error "opendir*"
-                   "opendir*: ~A"
-                   (list (strerror err))
+                   "~A: ~A" (list name (strerror err))
                    (list err))
             ptr)))))