Skip to content

Commit

Permalink
Merge pull request #2279 from zli/CAR-483-cont
Browse files Browse the repository at this point in the history
CAR-483 bug fix
  • Loading branch information
euanh committed Jul 8, 2015
2 parents 132e382 + d462429 commit 592aeea
Showing 1 changed file with 3 additions and 1 deletion.
4 changes: 3 additions & 1 deletion ocaml/xapi/message_forwarding.ml
Expand Up @@ -931,7 +931,9 @@ module Forward = functor(Local: Custom_actions.CUSTOM_ACTIONS) -> struct
with_global_lock
(fun () ->
finally_clear_host_operation ~__context ~host:suitable_host ?host_op ();
Db.VM.set_scheduled_to_be_resident_on ~__context ~self:vm ~value:Ref.null))
(* In certain cases, VM might have been destroyed as a consequence of operation *)
if Db.is_valid_ref __context vm then
Db.VM.set_scheduled_to_be_resident_on ~__context ~self:vm ~value:Ref.null))

(* Used by VM.start_on, VM.resume_on, VM.migrate to verify a host has enough resource and to
'allocate_vm_to_host' (ie set the 'scheduled_to_be_resident_on' field) *)
Expand Down

0 comments on commit 592aeea

Please sign in to comment.