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 ""))); 
  ]