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

JJ: Description from the destination commit:

Browse source 
functorize secmod

JJ: Description from source commit:
ok secmod + logs
This commit is contained in:
swrup 2026-02-21 18:43:47 +01:00
parent 7f440077ed
commit 34a55dec6b
7 changed files with 183 additions and 142 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/devices.ml
View file

@ -22,5 +22,5 @@ let keys =
let finally _key = () in
Vif.Device.v ~name:"keys" ~finally [ Vif.Device.value db_connection ]
@@ fun (module Conn : Pg.CONN) (_env : env) ->
let sm : (module Keys.S) = (module Keys.Make (Conn)) in
sm
let keys : (module Keys.S) = (module Keys.Make (Conn)) in
keys