1
0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2026-04-06 21:20:33 +02:00

services: virtual-build-machine: Do not offload when service is stopped.

* gnu/services/virtualization.scm (check-vm-availability): Check the
value of ‘live-service-running’.

Change-Id: Iba858ea0fa417d9276e026b72b4b78791932482e
This commit is contained in:
Ludovic Courtès
2024-02-12 16:38:12 +01:00
parent c1d37d0653
commit 4aa2dccd4e

View File

@@ -1500,7 +1500,8 @@ CONFIG, a <virtual-build-machine>, is up and running."
(srfi srfi-34))
(guard (c ((service-not-found-error? c) #f))
(->bool (current-service '#$service-name))))))
(->bool (live-service-running
(current-service '#$service-name)))))))
(define (build-vm-guix-extension config)
(define vm-ssh-key