diff options
Diffstat (limited to 'lib/concepts/Encoding.ml')
| -rw-r--r-- | lib/concepts/Encoding.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/concepts/Encoding.ml b/lib/concepts/Encoding.ml index 6420817..50eb6e6 100644 --- a/lib/concepts/Encoding.ml +++ b/lib/concepts/Encoding.ml @@ -216,7 +216,7 @@ module Value = struct Bencode.with_tag '?' value |>> Bencode.as_list |> Result.map Utilities.List.hd_opt - |>> (function None -> Ok None | Some v -> f v |> Result.map Option.some) + |>> function None -> Ok None | Some v -> f v |> Result.map Option.some end module Field = struct |