Change the 'close' field in the request record to be mutable rather than a reference

Signed-off-by: Jon Ludlam <Jonathan.Ludlam@eu.citrix.com>

diff --git a/ocaml/xapi/audit_log.ml b/ocaml/xapi/audit_log.ml
index 6e80c84c8ec810ab72110c7460685a4cd93ff09e..30707c0a28e8015f235c6fe38d78605b34374c79 100644 (file)
--- a/ocaml/xapi/audit_log.ml
+++ b/ocaml/xapi/audit_log.ml
@@ -125,7 +125,7 @@ let handler (req: request) (bio: Buf_io.t) =
 
        let s = Buf_io.fd_of bio in
        Buf_io.assert_buffer_empty bio;
-       req.close := true;
+       req.close <- true;
 
        Xapi_http.with_context (* makes sure to signal task-completed to cli *)
                (Printf.sprintf "audit_log_get request")