let extras_tocudf =
[
("Hold", ("hold", `Bool (Some false)));
("APT-Pin", ("apt-pin", `Int None));
("APT-ID", ("apt-id", `String None));
("APT-Candidate", ("apt-candidate", `Bool (Some false)));
("APT-Automatic", ("apt-automatic", `Bool (Some false)));
("Section", ("section", `String (Some "")));
]