aboutsummaryrefslogtreecommitdiff
path: root/src/property/libvirt.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'src/property/libvirt.lisp')
-rw-r--r--src/property/libvirt.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/property/libvirt.lisp b/src/property/libvirt.lisp
index 330bade..e7e5009 100644
--- a/src/property/libvirt.lisp
+++ b/src/property/libvirt.lisp
@@ -98,7 +98,7 @@ subcommand of virsh(1) to convert the running domain into a transient domain."
(I.e., if HOST is a string, ensure the domain named HOST is started; if HOST
is a HOST value, start the libvirt domain whose name is HOST's hostname.)"
(:desc #?"libvirt domain ${(get-hostname host)} started")
- (:check (host-domain-started-p host))
+ (:check (or (service:no-services-p) (host-domain-started-p host)))
(:apply (mrun "virsh" "start" (get-hostname host))))
(defprop destroyed :posix (host)