diff options
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/pages/BlogIndex.mlx | 2 | ||||
| -rw-r--r-- | lib/router.ml | 5 |
2 files changed, 4 insertions, 3 deletions
diff --git a/lib/pages/BlogIndex.mlx b/lib/pages/BlogIndex.mlx index 7f13bed..a7a680f 100644 --- a/lib/pages/BlogIndex.mlx +++ b/lib/pages/BlogIndex.mlx @@ -15,7 +15,7 @@ module Layout = struct <html> <head> <title>(React.string "Bloody Shovel 5")</title> - <link href="/styles.css" rel="stylesheet" /> + <link href="/assets/styles.css" rel="stylesheet" /> <meta name="viewport" content="width=device-width, initial-scale=1" /> <meta charSet="UTF-8" /> </head> 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 |