summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2003-09-17 12:10:13 +0000
committerFrancois Pons <fpons@mandriva.com>2003-09-17 12:10:13 +0000
commit08ec04cc84d14cb3d4c8b4934c5a07e2668b81ae (patch)
tree34a64dc5474fa69322846ec484fb727054d9b179 /perl-install
parent0b7baa75894f2371003585829deb31a43b4b6564 (diff)
downloaddrakx-08ec04cc84d14cb3d4c8b4934c5a07e2668b81ae.tar
drakx-08ec04cc84d14cb3d4c8b4934c5a07e2668b81ae.tar.gz
drakx-08ec04cc84d14cb3d4c8b4934c5a07e2668b81ae.tar.bz2
drakx-08ec04cc84d14cb3d4c8b4934c5a07e2668b81ae.tar.xz
drakx-08ec04cc84d14cb3d4c8b4934c5a07e2668b81ae.zip
fixed to close rpm db whenever possible.
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install_steps.pm2
1 files changed, 2 insertions, 0 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm
index 25d6d97c9..86ab5e3ea 100644
--- a/perl-install/install_steps.pm
+++ b/perl-install/install_steps.pm
@@ -349,6 +349,7 @@ sub pkg_install {
} else {
log::l("all packages selected are already installed, nothing to do")
}
+ delete $o->{packages}{rpmdb};
}
sub pkg_install_if_requires_satisfied {
@@ -366,6 +367,7 @@ sub pkg_install_if_requires_satisfied {
}
}
$o->installPackages;
+ delete $o->{packages}{rpmdb};
}
sub installPackages($$) { #- complete REWORK, TODO and TOCHECK!