diff options
| author | polwex <polwex@sortug.com> | 2025-07-18 19:07:53 +0700 |
|---|---|---|
| committer | polwex <polwex@sortug.com> | 2025-07-18 19:07:53 +0700 |
| commit | b41c9ec4a2cf26cea263e24145e23b7165cdd9f1 (patch) | |
| tree | 8af04dc8e4859c8fc59a419cb990f9a96a5bccd9 /lib/router.ml | |
| parent | e1bc08ed2b35a9b9faf76fab8316aec4224782cb (diff) | |
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 |