From: Vincent Hanquez <vincent.hanquez@eu.citrix.com>
Date: Thu, 30 Jul 2009 14:29:39 +0000 (+0100)
Subject: on dbus notification reply with a path that is valid. replacing - by _ in the uuid.
X-Git-Url: http://xenbits.xensource.com/gitweb?a=commitdiff_plain;h=72e8c51576dae273c93f7a2e2e84c0468997900d;p=xenclient%2Ftoolstack.git

on dbus notification reply with a path that is valid. replacing - by _ in the uuid.
---

diff --git a/xenvm/vmact.ml b/xenvm/vmact.ml
index fc4a446..9dd769b 100644
--- a/xenvm/vmact.ml
+++ b/xenvm/vmact.ml
@@ -57,7 +57,7 @@ let _notify state code l =
 		()
 	| NotifyDBus path ->
 		(* path/intf/method arbitrary for now. *)
-		let dbus_path = sprintf "/org/xen/vm/%s" state.vm_uuid in
+		let dbus_path = sprintf "/org/xen/vm/%s" (String.replace "-" "_" state.vm_uuid) in
 		let dbus_intf = "xenvm.signal.notify" in
 		let dbus_meth = "notify" in
 		let bus = DBus.Bus.get DBus.Bus.System in