diff options
| author | Christopher Baines <mail@cbaines.net> | 2020-12-24 09:25:54 +0000 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2020-12-24 09:25:54 +0000 |
| commit | 0788f7e15813628444e38cf0e5e8e774a1d85338 (patch) | |
| tree | 559bb3aaa45e23067aaa823d1305b7a5fe72445e /guix-build-coordinator/utils.scm | |
| parent | c47834e710e3fc4d92e0cf67d6e0f5188826573c (diff) | |
| download | build-coordinator-0788f7e15813628444e38cf0e5e8e774a1d85338.tar build-coordinator-0788f7e15813628444e38cf0e5e8e774a1d85338.tar.gz | |
Add better logging to has-substiutes-no-cache?
Diffstat (limited to 'guix-build-coordinator/utils.scm')
| -rw-r--r-- | guix-build-coordinator/utils.scm | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/guix-build-coordinator/utils.scm b/guix-build-coordinator/utils.scm index 8f18625..959e004 100644 --- a/guix-build-coordinator/utils.scm +++ b/guix-build-coordinator/utils.scm @@ -330,7 +330,13 @@ upcoming chunk." '() (list substitute-url))) (lambda (key . args) - (display (get-output-string log-port)) + (simple-format + (current-error-port) + "exception in has-substiutes-no-cache? ~A: ~A\n" + key args) + (display (string-append + (get-output-string log-port) + "\n")) (close-output-port log-port))))) substitute-urls))) substitute-urls)) |