# HG changeset patch
# User David Scott <[email protected]>
# Date 1259595425 0
# Node ID 5ccfa2ab41877451e99075815c155eb3bbb7229f
# Parent  d92c3fc8e193282a67da4e921f3159165313f31d
CA-35165: Remove some pointless and frequent logging.

Signed-off-by: David Scott <[email protected]>

diff -r d92c3fc8e193 -r 5ccfa2ab4187 ocaml/xapi/helpers.ml
--- a/ocaml/xapi/helpers.ml     Mon Nov 30 15:37:04 2009 +0000
+++ b/ocaml/xapi/helpers.ml     Mon Nov 30 15:37:05 2009 +0000
@@ -257,14 +257,12 @@
     try
       begin
         (* initially, try to parse lbr using new default sexpr format *)
-        debug "parsing lbr using sexpr";
         API.From.vM_t "ret_val" (Xmlrpc_sexpr.sexpr_str_to_xmlrpc lbr)
       end
     with
       (* xapi import/upgrade fallback: if sexpr parsing fails, try parsing 
using legacy xmlrpc format*)
       Api_errors.Server_error (code,_) when code=Api_errors.field_type_error 
-> 
         begin
-          debug "parsing lbr using legacy xmlrpc";
           API.From.vM_t "ret_val" (Xml.parse_string lbr)
         end
   with e -> 
1 file changed, 2 deletions(-)
ocaml/xapi/helpers.ml |    2 --


# HG changeset patch
# User David Scott <[email protected]>
# Date 1259595425 0
# Node ID 5ccfa2ab41877451e99075815c155eb3bbb7229f
# Parent  d92c3fc8e193282a67da4e921f3159165313f31d
CA-35165: Remove some pointless and frequent logging.

Signed-off-by: David Scott <[email protected]>

diff -r d92c3fc8e193 -r 5ccfa2ab4187 ocaml/xapi/helpers.ml
--- a/ocaml/xapi/helpers.ml	Mon Nov 30 15:37:04 2009 +0000
+++ b/ocaml/xapi/helpers.ml	Mon Nov 30 15:37:05 2009 +0000
@@ -257,14 +257,12 @@
     try
       begin
         (* initially, try to parse lbr using new default sexpr format *)
-        debug "parsing lbr using sexpr";
         API.From.vM_t "ret_val" (Xmlrpc_sexpr.sexpr_str_to_xmlrpc lbr)
       end
     with
       (* xapi import/upgrade fallback: if sexpr parsing fails, try parsing using legacy xmlrpc format*)
       Api_errors.Server_error (code,_) when code=Api_errors.field_type_error -> 
         begin
-          debug "parsing lbr using legacy xmlrpc";
           API.From.vM_t "ret_val" (Xml.parse_string lbr)
         end
   with e -> 
_______________________________________________
xen-api mailing list
[email protected]
http://lists.xensource.com/mailman/listinfo/xen-api

Reply via email to