diff --git a/src/proto/bootstrap/contract_storage.ml b/src/proto/bootstrap/contract_storage.ml index 28501948f..4d3d0efe8 100644 --- a/src/proto/bootstrap/contract_storage.ml +++ b/src/proto/bootstrap/contract_storage.ml @@ -100,7 +100,7 @@ let delete c contract = Roll_storage.Contract.assert_empty c contract >>=? fun () -> Storage.Contract.Balance.delete c contract >>=? fun c -> Storage.Contract.Manager.delete c contract >>=? fun c -> - Storage.Contract.Delegate.delete c contract >>=? fun c -> + Storage.Contract.Delegate.remove c contract >>= fun c -> Storage.Contract.Spendable.delete c contract >>=? fun c -> Storage.Contract.Delegatable.delete c contract >>=? fun c -> Storage.Contract.Counter.delete c contract >>=? fun c ->