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

+ wip /keys

Browse source
This commit is contained in:
swrup 2026-01-19 20:54:39 +01:00
parent 7b8edd05e9
commit 34e89a22bf
6 changed files with 139 additions and 8 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/pg.ml
View file

@ -61,7 +61,7 @@ let get_active_signkeys =
esk_serial FROM signkey_revocations skr WHERE esk.esk_serial = \
skr.esk_serial)"
in
fun (module Conn : CONN) () ->
fun (module Conn : CONN) ->
let now = Ptime_clock.now () |> Option.some in
Conn.collect_list get_active_signkeys now