diff options
author | Marius Peter <marius.peter@tutanota.com> | 2025-06-29 01:09:09 +0200 |
---|---|---|
committer | Marius Peter <marius.peter@tutanota.com> | 2025-06-29 01:09:09 +0200 |
commit | 331f1d2baa0bafa32d8bfc3d947ae3af7fc12796 (patch) | |
tree | ae94c09f870fab78c64f9e3e657feae3567bd5b2 /lib/handlers.ml | |
parent | b56bdde770615fb5c59f34d3f5c58d70ca9ad73b (diff) |
Differentiate (sub-)tree and blob views.
Diffstat (limited to 'lib/handlers.ml')
-rw-r--r-- | lib/handlers.ml | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lib/handlers.ml b/lib/handlers.ml index 76cdf42..5f67199 100644 --- a/lib/handlers.ml +++ b/lib/handlers.ml @@ -29,8 +29,10 @@ module Repo = struct let file_id req = let repo = Dream.param req "repo" in let id = Dream.param req "id" in - let* blob = Resolvers.Blob.of_id repo id in - Views.Repo.file repo blob + let* res = Resolvers.blob_or_tree repo id in + match res with + | `Tree tree -> Views.Repo.files repo tree + | `Blob blob -> Views.Repo.file repo blob let refs req = let repo = Dream.param req "repo" in |