summaryrefslogtreecommitdiffstats
path: root/perl-install/install/pkgs.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2007-07-11 16:57:01 +0000
committerPascal Rigaux <pixel@mandriva.com>2007-07-11 16:57:01 +0000
commita378443bee2334e130b573c276e7e54be47dc9b4 (patch)
tree1f185fd4ff1598d10ddbd5eb8bece68f82091fa9 /perl-install/install/pkgs.pm
parent1dea794cad3576057b6c7f3c837f7cb103861973 (diff)
downloaddrakx-backup-do-not-use-a378443bee2334e130b573c276e7e54be47dc9b4.tar
drakx-backup-do-not-use-a378443bee2334e130b573c276e7e54be47dc9b4.tar.gz
drakx-backup-do-not-use-a378443bee2334e130b573c276e7e54be47dc9b4.tar.bz2
drakx-backup-do-not-use-a378443bee2334e130b573c276e7e54be47dc9b4.tar.xz
drakx-backup-do-not-use-a378443bee2334e130b573c276e7e54be47dc9b4.zip
- allow using sqlite for rpmdb when using option rpm_dbapi=4
Diffstat (limited to 'perl-install/install/pkgs.pm')
-rw-r--r--perl-install/install/pkgs.pm10
1 files changed, 8 insertions, 2 deletions
diff --git a/perl-install/install/pkgs.pm b/perl-install/install/pkgs.pm
index 1d2f82ff3..a5452c3d5 100644
--- a/perl-install/install/pkgs.pm
+++ b/perl-install/install/pkgs.pm
@@ -548,11 +548,17 @@ sub openInstallLog() {
}
sub rpmDbOpen {
- my ($b_rebuild_needed) = @_;
+ my ($b_rebuild_needed, $o_rpm_dbapi) = @_;
clean_rpmdb_shared_regions();
+
+ if (my $wanted_dbapi = $o_rpm_dbapi) {
+ log::l("setting %_dbapi to $wanted_dbapi");
+ substInFile { s/%_dbapi.*//; $_ .= "%_dbapi $wanted_dbapi\n" if eof } "$::prefix/etc/rpm/macros";
+ URPM::add_macro("_dbapi $wanted_dbapi");
+ }
- if ($b_rebuild_needed) {
+ if ($b_rebuild_needed && !$o_rpm_dbapi) {
if (my $pid = fork()) {
waitpid $pid, 0;
$? & 0xff00 and die "rebuilding of rpm database failed";