diff --git a/gnu/services/virtualization.scm b/gnu/services/virtualization.scm index 0fbd51de8d3..69c8c84190d 100644 --- a/gnu/services/virtualization.scm +++ b/gnu/services/virtualization.scm @@ -1500,7 +1500,8 @@ CONFIG, a , 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