Signed-off-by: Rob Hoes <[email protected]>
# HG changeset patch # User Rob Hoes <[email protected]> # Date 1294419411 0 # Node ID ee1f39a1e592c6bace29a4a3b65efb53f8162b0f # Parent 45846a18c152faebd679a35c03bd730e0c4c4af8 Function to check license expiry Signed-off-by: Rob Hoes <[email protected]> diff -r 45846a18c152 -r ee1f39a1e592 ocaml/license/license.ml --- a/ocaml/license/license.ml +++ b/ocaml/license/license.ml @@ -154,6 +154,6 @@ (* Calls to obtain info about license *) -let check_expiry l = true -(* Unix.time () < l.expiry *) +let check_expiry l = + Unix.time () < l.expiry
# HG changeset patch # User Rob Hoes <[email protected]> # Date 1294419411 0 # Node ID ee1f39a1e592c6bace29a4a3b65efb53f8162b0f # Parent 45846a18c152faebd679a35c03bd730e0c4c4af8 Function to check license expiry Signed-off-by: Rob Hoes <[email protected]> diff -r 45846a18c152 -r ee1f39a1e592 ocaml/license/license.ml --- a/ocaml/license/license.ml +++ b/ocaml/license/license.ml @@ -154,6 +154,6 @@ (* Calls to obtain info about license *) -let check_expiry l = true -(* Unix.time () < l.expiry *) +let check_expiry l = + Unix.time () < l.expiry
_______________________________________________ xen-api mailing list [email protected] http://lists.xensource.com/mailman/listinfo/xen-api
