From a66e06b7fb07e17e1bc17e3bb16a399e6b9e3096 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mandriva.org>
Date: Wed, 4 Mar 2009 10:56:39 +0000
Subject: (_install_raw::close_helper) make sure to free package header so that
 rpmdb can be closed (else we exhaust the max number of opened fd)

---
 perl-install/install/pkgs.pm | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'perl-install/install/pkgs.pm')

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
-- 
cgit v1.2.1