diff options
Diffstat (limited to '')
| -rw-r--r-- | lib/backend/managers/Lifecycle.ml | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lib/backend/managers/Lifecycle.ml b/lib/backend/managers/Lifecycle.ml index 5f336ef..d104249 100644 --- a/lib/backend/managers/Lifecycle.ml +++ b/lib/backend/managers/Lifecycle.ml @@ -79,8 +79,7 @@ let rec cascade (tree : tree) (disposals : disposal BatFingerTree.t) (path : Con in Result.bind (Object.unregister path tree) (fun tree -> BatFingerTree.fold_left - (fun acc dep -> - Result.bind acc (fun (tree, disposals) -> cascade tree disposals dep) ) + (fun acc dep -> Result.bind acc (fun (tree, disposals) -> cascade tree disposals dep)) (Ok (tree, disposals)) edges ) end |