summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install/NEWS2
-rw-r--r--perl-install/install/pkgs.pm2
2 files changed, 4 insertions, 0 deletions
diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS
index 482ed1e56..711bdc69c 100644
--- a/perl-install/install/NEWS
+++ b/perl-install/install/NEWS
@@ -1,3 +1,5 @@
+- make sure to free package header so that rpmdb can be closed (else
+ we exhaust the max number of opened fd)
- really set urpmi in automatic mode for non-interactive installs
(and not vice-versa)
- use package summary translations once 'mdv-rpm-summary' is installed
diff --git a/perl-install/install/pkgs.pm b/perl-install/install/pkgs.pm
index 897cd8fa1..d7d88ed90 100644
--- a/perl-install/install/pkgs.pm
+++ b/perl-install/install/pkgs.pm
@@ -746,6 +746,8 @@ sub _install_raw {
$check_installed or log::l($pkg->name . " not installed, " . URPM::rpmErrorString());
$check_installed and $close->($pkg);
+ # prevent rpmdb to remain open:
+ $pkg->free_header;
}, inst => $callback,
trans => $callback,
# FIXME: implement already_installed_or_not_installable