let tocudf tables pkg =
let inst =
try
let _loc = Format822.dummy_loc in
let v = Packages.assoc "installed" pkg.Packages.extras in
Packages.parse_bool (_loc,v)
with Not_found -> false
in
Debcudf.tocudf tables ~inst ~extras:extras_tocudf pkg