bin/main.ml


1
2
3
4
5
6
7
8
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 "/static/**" (Dream.static "./lib/static");
       ]