search for: get_installed_pkg

I just tried to get libguestfs to compile on Ubuntu 11.10 using the latest febootstrap, and the following patches were necessary for me. They are all just reasonable code cleanups *except* for patch 5/5 which is a gross hack for something I don't understand about how Ubuntu 11.10 multiarch support works. Rich.

...ode + (** How to interpret {!packages} *) val outputdir : string (** Output directory. *) val packages : string list diff --git a/src/supermin_debian.ml b/src/supermin_debian.ml index 08e7d7c..3759f9a 100644 --- a/src/supermin_debian.ml +++ b/src/supermin_debian.ml @@ -51,13 +51,16 @@ let get_installed_pkgs () = * 'apt-get install'. *) let which_dependencies = "-i" (*let which_dependencies = "--no-suggests --no-conflicts --no-breaks --no-replaces --no-enhances"*) -let rec debian_resolve_dependencies_and_download names = +let rec debian_resolve_dependencies_and_down...

...<> "no" && Config.apt_cache <> "no" && Config.dpkg <> "no" - -let installed_pkgs = ref [] - -let debian_init () = - installed_pkgs := - run_command_get_lines "dpkg-query --show --showformat='${Package}\\n'" - -let get_installed_pkgs () = - match !installed_pkgs with - | [] -> assert false - | pkgs -> pkgs - -(* Select which dependencies will be installed. See apt-cache(8) for - * complete details. Using "-i" means only Depends and Pre-depends - * are installed, which is stricter (fewer packages) than...