diff options
Diffstat (limited to 'guix-build-coordinator/coordinator.scm')
| -rw-r--r-- | guix-build-coordinator/coordinator.scm | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/guix-build-coordinator/coordinator.scm b/guix-build-coordinator/coordinator.scm index bb280aa..3844d72 100644 --- a/guix-build-coordinator/coordinator.scm +++ b/guix-build-coordinator/coordinator.scm @@ -459,11 +459,6 @@ (lambda (scheduler port) (display "#<scheduler>" port))) - (when pid-file - (call-with-output-file pid-file - (lambda (port) - (simple-format port "~A\n" (getpid))))) - (when update-datastore? (datastore-update (build-coordinator-datastore build-coordinator))) @@ -598,6 +593,11 @@ build-coordinator utility-thread-pool) + (when pid-file + (call-with-output-file pid-file + (lambda (port) + (simple-format port "~A\n" (getpid))))) + ;; Guile seems to just stop listening on ports, so try to ;; monitor that internally and just quit if it happens (spawn-port-monitoring-fiber (uri-port agent-communication-uri) |