# HG changeset patch
# User Rob Hoes <[email protected]>
CA-35945: host-apply-edition CLI command should return a non-zero value if it 
fails to apply the edition

Signed-off-by: Rob Hoes <[email protected]>

diff -r 650e531c3fe0 ocaml/xapi/cli_operations.ml
--- a/ocaml/xapi/cli_operations.ml      Tue Jan 05 17:07:05 2010 +0000
+++ b/ocaml/xapi/cli_operations.ml      Tue Jan 12 17:21:57 2010 +0000
@@ -2558,7 +2558,8 @@
     if alerts = [] then
       printer (Cli_printer.PStderr "Internal error: the licensing daemon was 
not found.")
     else
-      List.iter print_if_checkout_error alerts
+      List.iter print_if_checkout_error alerts;
+    raise (ExitWithError 1)
   | e -> raise e
 
 let host_evacuate printer rpc session_id params =
# HG changeset patch
# User Rob Hoes <[email protected]>
CA-35945: host-apply-edition CLI command should return a non-zero value if it 
fails to apply the edition

Signed-off-by: Rob Hoes <[email protected]>

diff -r 650e531c3fe0 ocaml/xapi/cli_operations.ml
--- a/ocaml/xapi/cli_operations.ml      Tue Jan 05 17:07:05 2010 +0000
+++ b/ocaml/xapi/cli_operations.ml      Tue Jan 12 17:21:57 2010 +0000
@@ -2558,7 +2558,8 @@
     if alerts = [] then
       printer (Cli_printer.PStderr "Internal error: the licensing daemon was 
not found.")
     else
-      List.iter print_if_checkout_error alerts
+      List.iter print_if_checkout_error alerts;
+    raise (ExitWithError 1)
   | e -> raise e
 
 let host_evacuate printer rpc session_id params =
_______________________________________________
xen-api mailing list
[email protected]
http://lists.xensource.com/mailman/listinfo/xen-api

Reply via email to