s/Ptime_clock/Mirage_ptime/
This commit is contained in:
parent
e8d7b413ad
commit
eff2cb8e67
5 changed files with 8 additions and 8 deletions
|
|
@ -175,7 +175,7 @@ let init fs =
|
|||
let ht = Hashtbl.create 0xff in
|
||||
Ok { fs; sm_key_priv; sm_pub; ht }
|
||||
in
|
||||
let now = TimeAbsolute.of_ptime (Ptime_clock.now ()) in
|
||||
let now = TimeAbsolute.of_ptime (Mirage_ptime.now ()) in
|
||||
let keys = List.of_seq @@ Hashtbl.to_seq_values t.ht in
|
||||
let new_keys = gen_additional_keys_until_lookahead ~now keys in
|
||||
List.iter (fun k -> Hashtbl.replace t.ht k.pub k) new_keys;
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue