[Libguestfs] [PATCH supermin 1/5] dpkg: Don't use OCaml 4-ism when creating a struct.

Prevents us compiling on OCaml 3.11.2 in RHEL 6. --- src/dpkg.ml | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/dpkg.ml b/src/dpkg.ml index 8f92f7f..f96105f 100644 --- a/src/dpkg.ml +++ b/src/dpkg.ml @@ -64,7 +64,8 @@ let dpkg_package_of_string str = fun line -> match string_split " " line with | [ name; version; arch; _; _; "installed" ] -> - Hashtbl.add dpkg_packages name { name; version; arch } + let dpkg = { name = name; version = version; arch = arch } in + Hashtbl.add dpkg_packages name dpkg | _ -> (); ) lines ); -- 1.8.5.3