let ogit_root _ = Dream_html.respond @@ Views.Ogit_root.render ()
let repo_root repo = Dream_html.respond @@ Views.Repo.render repo

(* let repo_tree request = *)
(*   let repo_name = Dream.param request "repo_name" in *)
(*   let repo_path = Filename.concat (Unix.getenv "HOME") ("git/" ^ repo_name) in *)
(*   let content = *)
(*     if Sys.file_exists repo_path && Sys.is_directory repo_path then *)
(*       let files = Helpers.File_helpers.list_files repo_path in *)
(*       "<h1>Browsing repository: " ^ repo_name ^ "</h1><ul>" ^ files ^ "</ul>" *)
(*     else "<h1>Repository not found: " ^ repo_name ^ "</h1>" *)
(*   in *)
(*   Dream.html (page_layout ~content) *)