let is_installed pkg =
  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