diff options
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 |