summaryrefslogtreecommitdiff
path: root/lib/handlers.ml
diff options
context:
space:
mode:
authorMarius Peter <marius.peter@tutanota.com>2025-06-21 12:09:35 +0200
committerMarius Peter <marius.peter@tutanota.com>2025-06-21 12:09:35 +0200
commit034ae69f2f22d7957386e73b3c42053fbf0cdfb2 (patch)
treeb991f59a492b62b059029aa7365547e826c07416 /lib/handlers.ml
parent6e07594aace8bc2c6f99219b4022a68291201aad (diff)
Refactor resolvers.
Diffstat (limited to 'lib/handlers.ml')
-rw-r--r--lib/handlers.ml19
1 files changed, 10 insertions, 9 deletions
diff --git a/lib/handlers.ml b/lib/handlers.ml
index 871931c..e63e911 100644
--- a/lib/handlers.ml
+++ b/lib/handlers.ml
@@ -13,36 +13,37 @@ module Repo = struct
let summary req =
let repo = Dream.param req "repo" in
- let* branches = Resolvers.all_branches repo in
- let* commits = Resolvers.recent_commits repo 10 in
+ (* let* branches = Resolvers.Branch.all repo in *)
+ (* let* commits = Resolvers.Commit.recent repo 10 in *)
+ let* commits = Resolvers.Commit.head repo in
let authors = [ "John Pork"; "Sebastian Jellybean" ] in
- Views.Repo.summary repo branches commits authors
+ Views.Repo.summary repo () [commits] authors
let log req =
let repo = Dream.param req "repo" in
- let* commits = Resolvers.recent_commits repo 100 in
+ let* commits = Resolvers.Commit.recent repo 100 in
Views.Repo.log repo commits
let files_at_head req =
let repo = Dream.param req "repo" in
- let* tree = Resolvers.head_tree repo in
+ let* tree = Resolvers.Tree.head repo in
Views.Repo.files repo tree
let file_id req =
let repo = Dream.param req "repo" in
let id = Dream.param req "repo" in
- let* blob = Resolvers.blob_of_id repo id in
+ let* blob = Resolvers.Blob.of_id repo id in
Views.Repo.file repo blob
let refs req =
let repo = Dream.param req "repo" in
- let* branches = Resolvers.all_branches repo in
- Views.Repo.refs repo branches
+ (* let* branches = Resolvers.Branch.all repo in *)
+ Views.Repo.refs repo ()
let commit req =
let repo = Dream.param req "repo" in
let id = Dream.param req "id" in
- let* commit = Resolvers.commit_of_id repo id in
+ let* commit = Resolvers.Commit.of_id repo id in
Views.Repo.commit repo commit
end
Copyright 2019--2025 Marius PETER