[Xen-API] [PATCH 4 of 4] CA-38136: As the changes do not go in the beta, let VM.create_template in here, but make the call deprecated

[Thomas Gazagnaire <thomas.gazagnaire@xxxxxxxxxx>]

# HG changeset patch
# User Thomas Gazagnaire <thomas.gazagnaire@xxxxxxxxxx>
# Date 1266842151 0
# Node ID 1003898209ac7dd02c6d159c81d9b3a3ef3e6cf4
# Parent  bd6260d6f005a044b9574f8835506167c9963765
CA-38136: As the changes do not go in the beta, let VM.create_template in here, 
but make the call deprecated.

Signed-off-by: Thomas Gazagnaire <thomas.gazagnaire@xxxxxxxxxx>

diff -r bd6260d6f005 -r 1003898209ac ocaml/idl/datamodel.ml
--- a/ocaml/idl/datamodel.ml    Mon Feb 22 12:35:51 2010 +0000
+++ b/ocaml/idl/datamodel.ml    Mon Feb 22 12:35:51 2010 +0000
@@ -1258,6 +1258,21 @@
   ~errs:[Api_errors.vm_bad_power_state; Api_errors.sr_full; 
Api_errors.operation_not_allowed;
                Api_errors.vm_checkpoint_suspend_failed; 
Api_errors.vm_checkpoint_resume_failed]
   ~allowed_roles:_R_VM_POWER_ADMIN
+  ()
+
+let vm_create_template = call
+  ~name:"create_template"
+  ~hide_from_docs:true
+  ~internal_deprecated_since:rel_midnight_ride
+  ~in_product_since:rel_midnight_ride
+  ~doc:"Deprecated: use VM.clone or VM.copy instead."
+  ~result:(Ref _vm, "")
+  ~params:[
+           Ref _vm, "vm", "";
+           String, "new_name", ""
+         ]
+  ~errs:[]
+  ~allowed_roles:_R_VM_ADMIN
   ()
 
 (* VM.Provision -- causes the template's disks to be instantiated *)
1 file changed, 15 insertions(+)
ocaml/idl/datamodel.ml |   15 +++++++++++++++

xen-api.hg-4.patch
Description: Text Data

_______________________________________________
xen-api mailing list
xen-api@xxxxxxxxxxxxxxxxxxx
http://lists.xensource.com/mailman/listinfo/xen-api