mirror of
git://git.savannah.gnu.org/guix/data-service.git
synced 2023-12-14 03:23:03 +01:00
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
|
||||
id
|
||||
(lambda ()
|
||||
(catch #t
|
||||
(with-exception-handler
|
||||
(lambda (exn)
|
||||
(simple-format (current-error-port)
|
||||
"error: load-new-guix-revision: ~A\n"
|
||||
exn)
|
||||
(backtrace)
|
||||
#f)
|
||||
(lambda ()
|
||||
(with-store-connection
|
||||
(lambda (store)
|
||||
(load-new-guix-revision conn
|
||||
store
|
||||
git-repository-id
|
||||
commit))))
|
||||
(lambda (key . args)
|
||||
(simple-format
|
||||
(current-error-port)
|
||||
"error: load-new-guix-revision: ~A ~A\n"
|
||||
key args)
|
||||
#f)))))
|
||||
commit))))))))
|
||||
#t))
|
||||
(begin
|
||||
(record-job-succeeded conn id)
|
||||
|
|
Loading…
Reference in a new issue