From b36ee4fd4cdcc94dd41f142b2058c8bbe032f497 Mon Sep 17 00:00:00 2001
From: Christopher Baines <mail@cbaines.net>
Date: Fri, 15 Mar 2024 23:30:22 +0000
Subject: Remove the core-guile-sleep variable

As this is unnecessary.
---
 guix-build-coordinator/coordinator.scm | 2 +-
 guix-build-coordinator/utils.scm       | 7 +------
 2 files changed, 2 insertions(+), 7 deletions(-)

diff --git a/guix-build-coordinator/coordinator.scm b/guix-build-coordinator/coordinator.scm
index 14dd160..3830d88 100644
--- a/guix-build-coordinator/coordinator.scm
+++ b/guix-build-coordinator/coordinator.scm
@@ -1202,7 +1202,7 @@
                        ;; the hook processing thread crashing, also raises
                        ;; an exception, so just try and sleep and hope
                        ;; things go better next time
-                       (core-guile-sleep 10))
+                       (sleep 10))
                    (lambda ()
                      (log-msg (build-coordinator-logger build-coordinator)
                               'CRITICAL
diff --git a/guix-build-coordinator/utils.scm b/guix-build-coordinator/utils.scm
index a9d7edf..bef9937 100644
--- a/guix-build-coordinator/utils.scm
+++ b/guix-build-coordinator/utils.scm
@@ -102,9 +102,7 @@
 
             open-socket-for-uri*
 
-            check-locale!
-
-            core-guile-sleep))
+            check-locale!))
 
 (eval-when (eval load compile)
   (begin
@@ -1476,6 +1474,3 @@ falling back to en_US.utf8\n"
     (lambda _
       (setlocale LC_ALL ""))
     #:unwind? #t))
-
-(define core-guile-sleep
-  sleep)
-- 
cgit v1.2.3