From: Rob Hoes <rob.hoes@citrix.com>
Date: Wed, 26 Jan 2011 17:39:04 +0000 (+0000)
Subject: Function to check license expiry
X-Git-Url: http://xenbits.xensource.com/gitweb?a=commitdiff_plain;h=59a01f4c3ce9c0e67e687521aec154304e14daa1;p=xcp%2Fxen-api.git

Function to check license expiry

Signed-off-by: Rob Hoes <rob.hoes@citrix.com>
---

diff --git a/ocaml/license/license.ml b/ocaml/license/license.ml
index 7811678c..078ac055 100644
--- a/ocaml/license/license.ml
+++ b/ocaml/license/license.ml
@@ -154,6 +154,6 @@ let license : license ref = ref (default ())
 
 (* Calls to obtain info about license *)
 
-let check_expiry l = true
-(*	Unix.time () < l.expiry *)
+let check_expiry l = 
+	Unix.time () < l.expiry