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

working database~~

Browse source
This commit is contained in:
swrup 2025-11-22 21:40:24 +01:00
parent 22f8a1d26e
commit 6559b789b1
4 changed files with 94 additions and 55 deletions
Download patch file Download diff file Expand all files Collapse all files

5
src/mte.ml
View file

@ -113,7 +113,7 @@ let routes =
get (rel / "privacy" /?? nil) --> Static.privacy;
get (rel / "management" / "keys" /?? nil) --> Management.keys;
get (rel / "db_test" /?? nil) --> Database.test;
get (rel / "db_init" /?? nil) --> Database.init;
get (rel / "db_activate" /?? nil) --> Database.test_activate;
]
let () =
@ -129,7 +129,8 @@ let () =
in
let devices =
(* todo: rm unneeded env parameter from secmod devices *)
Vif.Devices.[ Devices.secmod_signkey; Devices.secmod_denom; Devices.caqti ]
Vif.Devices.
[ Devices.secmod_signkey; Devices.secmod_denom; Devices.db_connection ]
in
let middlewares = Vif.Middlewares.[] in
Vif.run ~cfg ~devices ~middlewares routes env