diff options
Diffstat (limited to 'lib/handlers')
| -rw-r--r-- | lib/handlers/dune | 4 | ||||
| -rw-r--r-- | lib/handlers/handlers.ml | 13 |
2 files changed, 0 insertions, 17 deletions
diff --git a/lib/handlers/dune b/lib/handlers/dune deleted file mode 100644 index 4bae840..0000000 --- a/lib/handlers/dune +++ /dev/null @@ -1,4 +0,0 @@ -(library - (name handlers) - (public_name ogit.handlers) - (libraries dream views)) diff --git a/lib/handlers/handlers.ml b/lib/handlers/handlers.ml deleted file mode 100644 index 564d563..0000000 --- a/lib/handlers/handlers.ml +++ /dev/null @@ -1,13 +0,0 @@ -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) *) |