diff options
| author | Marcos Magueta <maguetamarcos@gmail.com> | 2026-04-27 13:00:30 -0300 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2026-04-27 13:00:30 -0300 |
| commit | 56492ad5f6f09d8c9f337d42803b64d1b9f0668b (patch) | |
| tree | 0a41825d319fe47e037e2e30ed515c3c2d9b0d7d /lib/management/branch.ml | |
| parent | 12f170f438f5909511da2f26c5d33a85acc1fe64 (diff) | |
| download | Sakura-56492ad5f6f09d8c9f337d42803b64d1b9f0668b.tar.gz Sakura-56492ad5f6f09d8c9f337d42803b64d1b9f0668b.zip | |
Introduce Multigroups (#65)
Diffstat (limited to 'lib/management/branch.ml')
| -rw-r--r-- | lib/management/branch.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/management/branch.ml b/lib/management/branch.ml index 1d218b1..81dcdff 100644 --- a/lib/management/branch.ml +++ b/lib/management/branch.ml @@ -78,7 +78,7 @@ module Make (Storage : Physical.S with type error = string) = struct let mk v = { Attribute.value = Obj.repr v } in let rec generator position = match position with - | None -> Generator.Error "random access not supported for sakura:branch" + | None -> Generator.Error "random access not supported for public:branch" | Some pos -> ( match list storage with | Error _ -> Generator.Done @@ -109,7 +109,7 @@ module Make (Storage : Physical.S with type error = string) = struct let mk v = { Attribute.value = Obj.repr v } in let generator position = match position with - | None -> Generator.Error "random access not supported for sakura:head" + | None -> Generator.Error "random access not supported for public:head" | Some 0 -> ( match get_head storage with | Ok None | Error _ -> Generator.Done |