Merge pull request #1850 from jonludlam/ocaml-4.00.1-build-fix

Fix build on ocaml-4.00.1
xapi-project · Jul 25, 2014 · 257d702 · 257d702
2 parents 6cba889 + ef38963
commit 257d702
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/ocaml/xapi/xapi_udhcpd.ml b/ocaml/xapi/xapi_udhcpd.ml
@@ -31,6 +31,8 @@ let udhcpd_skel = Filename.concat Fhs.etcdir "udhcpd.skel"
 let leases_db = Filename.concat "/var/lib/xcp" "dhcp-leases.db"
 let pidfile = "/var/run/udhcpd.pid"
 
+let (|>) x f = f x
+
 module Ip = struct
 	type t = int * int * int * int with rpc