This commit is contained in:
swrup 2026-03-12 12:23:57 +01:00
parent 69755537f6
commit 8df2b129e8
7 changed files with 57 additions and 57 deletions

View file

@ -2,9 +2,9 @@
let aux asset req _server _env =
let etag = Assets.etag asset in
let headers = Vif.Request.headers req in
let headers = Vifu.Request.headers req in
let has_matching_etag =
match Vif.Headers.get headers "if-none-match" with
match Vifu.Headers.get headers "if-none-match" with
| None -> Ok false
| Some s ->
Headers_lib.If_none_match.parse s
@ -19,7 +19,7 @@ let aux asset req _server _env =
let compression = Headers.select_encoding headers in
let data = Assets.get_content ~mime ~lang asset in
(* -- *)
let open Vif.Response in
let open Vifu.Response in
let open Syntax in
let* () = with_string ?compression req data in
let* () =