# HG changeset patch # User David Scott # Date 1268845370 0 # Node ID 0499cdf381f9c1146d4d3640204a7e264d700730 # Parent 178a3a5bd3122aa48f78a4636c99b1b8792d74bf CA-36448: remove a sleep(30) I accidentally added (!) Signed-off-by: David Scott diff -r 178a3a5bd312 -r 0499cdf381f9 ocaml/xapi/xapi_vm_clone.ml --- a/ocaml/xapi/xapi_vm_clone.ml Wed Mar 17 15:33:01 2010 +0000 +++ b/ocaml/xapi/xapi_vm_clone.ml Wed Mar 17 17:02:50 2010 +0000 @@ -126,8 +126,6 @@ (fun vbd -> try (vbd,Db.VDI.get_virtual_size ~__context ~self:(Db.VBD.get_VDI ~__context ~self:vbd)) with _ -> (vbd,0L)) vbds in let total = Int64.to_float (List.fold_left (fun tot (_,size) -> Int64.add tot size) 0L sizes) in - - Thread.delay 30.; let fold_function (acc,done_so_far) (vbd,size) = try