+ s/Vif/Vifu/

src/mte.ml

@@ -14,17 +14,17 @@
     along with this program.  If not, see <https://www.gnu.org/licenses/>. *)
 
 let hello req _server _env =
-  let open Vif.Response in
+  let open Vifu.Response in
   let open Syntax in
   let* () = with_string req "Hello~~\n" in
   let* () = add ~field:"content-type" "text/plain" in
   respond `OK
 
 let routes =
-  let open Vif.Uri in
-  let open Vif.Route in
+  let open Vifu.Uri in
+  let open Vifu.Route in
   let get path = get (path /?? any) in
-  let post path jsont = post (Vif.Type.json_encoding jsont) (path /?? any) in
+  let post path jsont = post (Vifu.Type.json_encoding jsont) (path /?? any) in
   let v s = rel / s in
   let tos =
     [
@@ -133,9 +133,9 @@ let () =
   let env : Devices.env =
     { caqti_switch; db_uri= Config.Exchangedb_postgres.config }
   in
-  let devices = Vif.Devices.[ Devices.db_connection; Devices.keys ] in
-  let middlewares = Vif.Middlewares.[] in
+  let devices = Vifu.Devices.[ Devices.db_connection; Devices.keys ] in
+  let middlewares = Vifu.Middlewares.[] in
   Logs.info (fun m ->
       m ~tags:(Util.Log_reporter.detail "...") "Starting MTE server");
-  Vif.run ~cfg ~devices ~middlewares routes env
+  Vifu.run ~cfg ~devices ~middlewares routes env
   *)