This commit is contained in:
parent
bded77a939
commit
d2c7867715
1 changed files with 2 additions and 2 deletions
|
|
@ -92,8 +92,8 @@ let split_in_periodes ~start ~end_ =
|
|||
go acc start end_
|
||||
|
||||
let gen_additional_keys_until_lookahead ~now l =
|
||||
(* try to _not_ generate keys with validity start in the past
|
||||
(probably not important) *)
|
||||
(* TODO do not exceed lookahead (probably more important...) *)
|
||||
(* try to not generate keys with validity start in the past *)
|
||||
let start =
|
||||
match List.rev (sort_keys l) with
|
||||
| [] -> now
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue