aboutsummaryrefslogtreecommitdiffstats
path: root/lib/kernel/Namespace.ml
diff options
context:
space:
mode:
authorEstevan Castilho <tevo@riajuu.net>2026-10-24 01:30:08 +0000
committerEstevan Castilho <tevo@riajuu.net>2026-10-24 01:30:08 +0000
commit0f5161930584eaf91fd195b891ce7d9130c7b7f1 (patch)
treea505f4b7bfe8dc0b0efa06c42b75502aeb2f247a /lib/kernel/Namespace.ml
parent0b1c7ca41a6d8ce41b9783153b567c16250913ff (diff)
downloadRNT-0f5161930584eaf91fd195b891ce7d9130c7b7f1.tar.gz
RNT-0f5161930584eaf91fd195b891ce7d9130c7b7f1.zip
Forsake `fmap`
Diffstat (limited to 'lib/kernel/Namespace.ml')
-rw-r--r--lib/kernel/Namespace.ml3
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