Merge pull request #5711 from Vincent-lau/private/shul2/stack-version…

…-cli Make `cluster-stack-version` show up in the CLI
xapi-project · Jun 24, 2024 · e6af4ab · e6af4ab
2 parents 4770d5e + c14aa08
commit e6af4ab
Showing 1 changed file with 5 additions and 0 deletions.
diff --git a/ocaml/xapi-cli-server/records.ml b/ocaml/xapi-cli-server/records.ml
@@ -5044,6 +5044,11 @@ let cluster_record rpc session_id cluster =
       ; make_field ~name:"cluster-stack"
           ~get:(fun () -> (x ()).API.cluster_cluster_stack)
           ()
+      ; make_field ~name:"cluster-stack-version"
+          ~get:(fun () ->
+            (x ()).API.cluster_cluster_stack_version |> Int64.to_string
+          )
+          ()
       ; make_field ~name:"token-timeout"
           ~get:(fun () -> string_of_float (x ()).API.cluster_token_timeout)
           ()