# HG changeset patch # User David Scott # Date 1261672765 0 # Node ID 4721344ab39ff8b6762ded31b176f2556bfa6569 # Parent cc0e09b294e1e383196106bf97278e0918c5693c Remove the check for a license being 'valid' (the restrictions checks were already gone; this one caused licenses to 'expire' after 30days) Signed-off-by: David Scott diff -r cc0e09b294e1 -r 4721344ab39f ocaml/license/license.ml --- a/ocaml/license/license.ml Mon Dec 21 21:38:37 2009 +0000 +++ b/ocaml/license/license.ml Thu Dec 24 16:39:25 2009 +0000 @@ -199,7 +199,7 @@ let check_expiry l = Unix.time () < l.expiry -let license_valid () = check_expiry !license +let license_valid () = true (* License setting functions *)