aboutsummaryrefslogtreecommitdiff
path: root/guix-build-coordinator/agent.scm
diff options
context:
space:
mode:
Diffstat (limited to 'guix-build-coordinator/agent.scm')
-rw-r--r--guix-build-coordinator/agent.scm6
1 files changed, 3 insertions, 3 deletions
diff --git a/guix-build-coordinator/agent.scm b/guix-build-coordinator/agent.scm
index b041a2f..c3c1604 100644
--- a/guix-build-coordinator/agent.scm
+++ b/guix-build-coordinator/agent.scm
@@ -500,7 +500,7 @@
(unless (running-on-the-hurd?)
(call-with-new-thread
(lambda ()
- (set-thread-name "gbc signal info")
+ (set-thread-name "signal info")
(sigaction SIGUSR1
(lambda _
@@ -510,7 +510,7 @@
(call-with-new-thread
(lambda ()
- (set-thread-name "gbc console info")
+ (set-thread-name "console info")
(let loop ((line (get-line (current-input-port))))
(unless (eof-object? line)
@@ -520,7 +520,7 @@
(unless (running-on-the-hurd?)
(call-with-new-thread
(lambda ()
- (set-thread-name "gbc submit status")
+ (set-thread-name "submit status")
(while #t
(with-exception-handler