diff options
Diffstat (limited to 'lib/router.ml')
| -rw-r--r-- | lib/router.ml | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lib/router.ml b/lib/router.ml index c3b4af2..ee789c6 100644 --- a/lib/router.ml +++ b/lib/router.ml @@ -27,8 +27,9 @@ let static (path : Parts.t) (_db : Handler.pool) (_req : Request.t) : (Response.t, Caqti_error.t) result = let pat = Parts.wildcard_match path in - Logs.info (fun d -> d "static path %S\n" pat); - match Body.sendfile pat with + let asset_path = "assets/" ^ pat in + Logs.info (fun d -> d "static path %S\n" asset_path); + match Body.sendfile asset_path with | Error _ -> Ok (Response.create `Not_found) | Ok body -> (match Body.to_string body with |