CA-41976: Field type error --- create_template field problem. FIXED.

Signed-off-by: Rok Strnisa <rok.strnisa@citrix.com>

diff --git a/ocaml/idl/datamodel.ml b/ocaml/idl/datamodel.ml
index 69d27aa7eade50bb9886596387d687a4340528c0..81c77b7d53e07f5388b9bc5b3976722e4fcc8a74 100644 (file)
--- a/ocaml/idl/datamodel.ml
+++ b/ocaml/idl/datamodel.ml
@@ -5755,7 +5755,7 @@ let vm_power_state =
 let vm_operations = 
   Enum ("vm_operations",
        List.map operation_enum
-         [ vm_snapshot; vm_clone; vm_copy; vm_revert; vm_checkpoint; vm_snapshot_with_quiesce;
+         [ vm_snapshot; vm_clone; vm_copy; vm_create_template; vm_revert; vm_checkpoint; vm_snapshot_with_quiesce;
                vm_provision; vm_start; vm_start_on; vm_pause; vm_unpause; vm_cleanShutdown;
            vm_cleanReboot; vm_hardShutdown; vm_stateReset; vm_hardReboot;
            vm_suspend; csvm; vm_resume; vm_resume_on;

diff --git a/ocaml/xapi/xapi_vm_lifecycle.ml b/ocaml/xapi/xapi_vm_lifecycle.ml
index 06f8ed4518869af2e54fdfc9cd7c84361c6ca25b..8263da4b17a4ec1e0e299b8a8ee1e471c2ac9900 100644 (file)
--- a/ocaml/xapi/xapi_vm_lifecycle.ml
+++ b/ocaml/xapi/xapi_vm_lifecycle.ml
@@ -65,6 +65,7 @@ let allowed_power_states ~(op:API.vm_operations) =
                                        -> [`Halted; `Running]
        | `clone
        | `copy
+       | `create_template (* Don't touch until XMLRPC unmarshal code is able to pre-blank fields on input. *)
        | `export
                                        -> [`Halted; `Suspended]
        | `hard_reboot