search for: get_repos_dir

Displaying 2 results from an estimated 2 matches for "get_repos_dir".

2013 Jun 04
2
[PATCH / RFC] Handle --packager-config in zypp_rpm
...+++ b/src/supermin_zypp_rpm.ml @@ -45,6 +45,7 @@ *) open Unix open Printf +open Inifiles open Supermin_package_handlers open Supermin_utils @@ -54,6 +55,19 @@ open Supermin_cmdline (* Create a temporary directory for use by all the functions in this file. *) let tmpdir = tmpdir () +let get_repos_dir () = + let zypper_default = "/etc/zypp/repos.d" in + let parse_repos_dir path = + let cfg = new inifile path in + let dir = (try cfg#getval "main" "reposdir" with _ -> zypper_default) in + dir + in + let dir = (match packager_config with None -> zyp...
2014 Feb 25
2
[PATCH supermin v4] Supermin 5 rewrite.
...lt;rootdir> so that zypper can - * use the specified config. - *) -open Unix -open Printf -open Inifiles - -open Supermin_package_handlers -open Supermin_utils -open Supermin_cmdline - - -(* Create a temporary directory for use by all the functions in this file. *) -let tmpdir = tmpdir () - -let get_repos_dir () = - let zypper_default = "/etc/zypp/repos.d" in - let parse_repos_dir path = - let cfg = new inifile path in - let dir = (try cfg#getval "main" "reposdir" with _ -> zypper_default) in - dir - in - let dir = (match packager_config with None -> zypp...