Improve the error reporting within process-load-new-guix-revision-job
By including a backtrace.
This commit is contained in:
parent
b166177dbd
commit
a95c5ca5c9
1 changed files with 8 additions and 8 deletions
|
|
@ -1589,20 +1589,20 @@ SKIP LOCKED")
|
||||||
(setup-logging
|
(setup-logging
|
||||||
id
|
id
|
||||||
(lambda ()
|
(lambda ()
|
||||||
(catch #t
|
(with-exception-handler
|
||||||
|
(lambda (exn)
|
||||||
|
(simple-format (current-error-port)
|
||||||
|
"error: load-new-guix-revision: ~A\n"
|
||||||
|
exn)
|
||||||
|
(backtrace)
|
||||||
|
#f)
|
||||||
(lambda ()
|
(lambda ()
|
||||||
(with-store-connection
|
(with-store-connection
|
||||||
(lambda (store)
|
(lambda (store)
|
||||||
(load-new-guix-revision conn
|
(load-new-guix-revision conn
|
||||||
store
|
store
|
||||||
git-repository-id
|
git-repository-id
|
||||||
commit))))
|
commit))))))))
|
||||||
(lambda (key . args)
|
|
||||||
(simple-format
|
|
||||||
(current-error-port)
|
|
||||||
"error: load-new-guix-revision: ~A ~A\n"
|
|
||||||
key args)
|
|
||||||
#f)))))
|
|
||||||
#t))
|
#t))
|
||||||
(begin
|
(begin
|
||||||
(record-job-succeeded conn id)
|
(record-job-succeeded conn id)
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue