swrup/mte
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

simplify: rm revoke from sk/dn data type

Browse source
This commit is contained in:
swrup 2026-02-23 06:55:13 +01:00
parent d7ccd69350
commit af355249fc
7 changed files with 21 additions and 54 deletions
Download patch file Download diff file Expand all files Collapse all files

11
src/keys.ml
View file

@ -209,15 +209,7 @@ module Make (Conn : Pg.CONN) : S = struct
{ key; stamp_start; stamp_expire; stamp_end; signkey_secmod_sig= _ } =
future_sk
in
Signkey.
{
pub= key;
stamp_start;
stamp_expire;
stamp_end;
master_sig;
revoked_sig= None;
}
Signkey.{ pub= key; stamp_start; stamp_expire; stamp_end; master_sig }
let dn_of_future_dn future_dn h_pub master_sig =
let Api.FutureDenom.
@ -256,7 +248,6 @@ module Make (Conn : Pg.CONN) : S = struct
age_mask= 0;
h_pub;
master_sig;
revoked_sig= None;
}
let certify_future_signkey pub master_sig =