diff options
Diffstat (limited to 'bin/main.ml')
| -rw-r--r-- | bin/main.ml | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/bin/main.ml b/bin/main.ml index 895bfb8..c30e4fc 100644 --- a/bin/main.ml +++ b/bin/main.ml @@ -2,8 +2,9 @@ let () = Dream.run @@ Dream.logger @@ Dream.router [ - Dream.get "/" (fun _ -> Ogit.Handlers.ogit_root ()); - Dream.get "/:repo_name" (fun request -> - Ogit.Handlers.repo_root @@ Dream.param request "repo_name"); + Dream.get "/" (fun _req -> Ogit.Handlers.ogit_root _req); + Dream.get "/:repo_name" (fun req -> + let repo_name = Dream.param req "repo_name" in + Ogit.Handlers.repo_root repo_name); Dream.get "/static/**" (Dream.static "./lib/static"); ] |