Remove some obsolete FIST points

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

ocaml/xapi/xapi_fist.ml

@@ -85,20 +85,6 @@ let reduce_blob_sync_interval = fistpoint "reduce_blob_sync_interval"
 let reduce_rrd_backup_interval = fistpoint "reduce_rrd_backup_interval"
 let reduce_rra_times = fistpoint "reduce_rra_times"
 
-(** {2 Licensing fist points} *)
-
-(** Reduce the v6-licensing grace period from 30 days to 15 minutes *)
-let reduce_grace_period () = fistpoint "reduce_grace_period"
-
-(** Reduce the v6-licensing upgrade grace period from 4 days to 15 minutes *)
-let reduce_upgrade_grace_period () = fistpoint "reduce_upgrade_grace_period"
-
-(** Set the expiry date of a v6-license to the one in the file *)
-let set_expiry_date () = fistpoint_read "set_expiry_date"
-
-(** Reduce the retry period after obtaining a grace license from 1h to 5min *)
-let reduce_grace_retry_period () = fistpoint "reduce_grace_retry_period"
-
 (** Forces synchronous lifecycle path to defer to the event thread *)
 let disable_sync_lifecycle_path () = fistpoint "disable_sync_lifecycle_path"