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 967d76c..fff40d1 100644
--- a/src/property/libvirt.lisp
+++ b/src/property/libvirt.lisp
@@ -87,7 +87,7 @@ subcommand of virsh(1) to convert the running domain into a transient domain."
nil
"virt-install --print-xml -n ~A~:[~; --os-variant=~:*~A~]~{ ~A~} >~S"
(get-hostname host) (os-variant host)
- (mapcar #'escape-sh-token arguments) file))
+ (mapcar #'sh-escape arguments) file))
(mrun "virsh" "define" file)))
(:unapply
(declare (ignore arguments))