diff options
Diffstat (limited to '')
| -rw-r--r-- | lib/kernel/Namespace.ml | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/kernel/Namespace.ml b/lib/kernel/Namespace.ml index 80c446f..efaf667 100644 --- a/lib/kernel/Namespace.ml +++ b/lib/kernel/Namespace.ml @@ -25,9 +25,10 @@ class namespace = method list = Atomic.get entries |> BatMap.keys |> BatFingerTree.of_enum |> Result.ok method find key = + let open Utilities.Option in Atomic.get entries |> BatMap.find_opt key - |> Utilities.Option.fmap Protocols.Handle.copy + |>> Protocols.Handle.copy |> Result.ok end |