diff --git a/src/proto_alpha/lib_delegate/block_forge.ml b/src/proto_alpha/lib_delegate/block_forge.ml index 3f569540956374a264a3c5801aaa3ec407bbe000..072d2ee232ef7c66ff9a22b1c3f7bc7c2b5a558e 100644 --- a/src/proto_alpha/lib_delegate/block_forge.ml +++ b/src/proto_alpha/lib_delegate/block_forge.ml @@ -533,7 +533,7 @@ let partition_consensus_operations_on_reproposal consensus_operations = eligible_attestations, eligible_preattestations, other_operations ) - | Single (Attestation {dal_content = None; _}), Some (Bls _) -> + | Single (Attestation _), Some (Bls _) -> let op : Kind.attestation Operation.t = {shell; protocol_data} in let eligible_attestations = op :: eligible_attestations in ( attestations_aggregate_opt,