aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--gnu/services/virtualization.scm3
1 files changed, 2 insertions, 1 deletions
diff --git a/gnu/services/virtualization.scm b/gnu/services/virtualization.scm
index 0fbd51de8d..69c8c84190 100644
--- a/gnu/services/virtualization.scm
+++ b/gnu/services/virtualization.scm
@@ -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