diff options
| author | Christopher Baines <mail@cbaines.net> | 2025-02-12 18:20:53 +0000 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2025-02-12 18:26:37 +0000 |
| commit | 1a160d6cd3532796c44bcdf5c2a86aa00ad15749 (patch) | |
| tree | eaa311e96e9f6420b7cbb8ef02396734ef8ecaff /guix-build-coordinator | |
| parent | 6855692e85b46cfa02df99b5c07e4aa4427377d4 (diff) | |
| download | build-coordinator-1a160d6cd3532796c44bcdf5c2a86aa00ad15749.tar build-coordinator-1a160d6cd3532796c44bcdf5c2a86aa00ad15749.tar.gz | |
Remove direct backtrace call in the agent
As I'm not sure the output is safe.
Diffstat (limited to 'guix-build-coordinator')
| -rw-r--r-- | guix-build-coordinator/agent.scm | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/guix-build-coordinator/agent.scm b/guix-build-coordinator/agent.scm index 71b3541..47a7c5f 100644 --- a/guix-build-coordinator/agent.scm +++ b/guix-build-coordinator/agent.scm @@ -883,7 +883,13 @@ but the guix-daemon claims it's unavailable" (simple-format/safe (current-error-port) "exception when performing build: ~A\n" exn) - (backtrace)) + (let* ((stack (make-stack #t)) + (backtrace + (call-with-output-string + (lambda (port) + (display-backtrace stack port) + (newline port))))) + (display/safe backtrace))) (raise-exception exn)) (lambda () (build-things store (list (derivation-file-name derivation))) |