Aha, another place with a hardcoded "1" :) Thanks for figuring this out!
Cheers, Dave > -----Original Message----- > From: [email protected] [mailto:xen-api- > [email protected]] On Behalf Of Thomas Sanders > Sent: 03 November 2010 15:36 > To: [email protected] > Subject: [Xen-API] [PATCH] CA-46656: A ha-restart-priority of any valid > value means ha-always-run should be set to true when the VM starts > > # HG changeset patch > # User Thomas Sanders <[email protected]> # Date 1288798450 0 # > Node ID cdbe193253c8684adf9fd5a8edf4823c4fbc20b3 > # Parent fa3a7ba9c89bc875a845aacf1cf362b2369e1b41 > CA-46656: A ha-restart-priority of any valid value means ha-always-run > should be set to true when the VM starts. > > Signed-off-by: Thomas Sanders <[email protected]> > Acked-by: Jonathan Knowles <[email protected]> > > diff --git a/ocaml/xapi/xapi_vm.ml b/ocaml/xapi/xapi_vm.ml > --- a/ocaml/xapi/xapi_vm.ml > +++ b/ocaml/xapi/xapi_vm.ml > @@ -1,5 +1,5 @@ > (* > - * Copyright (C) 2006-2009 Citrix Systems Inc. > + * Copyright (C) 2006-2010 Citrix Systems Inc. > * > * This program is free software; you can redistribute it and/or > modify > * it under the terms of the GNU Lesser General Public License as > published @@ -99,7 +99,7 @@ let set_ha_always_run ~__context ~self ~ > (* GUI not calling this anymore, now used internally in vm.start and > vm.resume *) let assert_ha_always_run_is_true ~__context ~vm = > let rp = Db.VM.get_ha_restart_priority ~__context ~self:vm in > - if (rp = "1" or rp = Constants.ha_restart_best_effort) > + if (List.mem rp (Constants.ha_valid_restart_priorities)) > then set_ha_always_run ~__context ~self:vm ~value:true > (* GUI not calling this anymore, now used internally in vm.shutdown > and vm.suspend *) let assert_ha_always_run_is_false ~__context ~vm = _______________________________________________ xen-api mailing list [email protected] http://lists.xensource.com/mailman/listinfo/xen-api
