From c3b5ff8158ed25327e34de957573b8c17b80b0eb Mon Sep 17 00:00:00 2001
From: Francois Pons <fpons@mandriva.com>
Date: Tue, 9 Nov 1999 14:42:05 +0000
Subject: *** empty log message ***

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

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

diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm
index 1e8c2326e..0179bf45d 100644
--- a/perl-install/pkgs.pm
+++ b/perl-install/pkgs.pm
@@ -313,6 +313,11 @@ sub init_db {
     $isUpgrade ? c::rpmdbRebuild($prefix) : c::rpmdbInit($prefix, 0644) or die "creation/rebuilding of rpm database failed: ", c::rpmErrorString();
 }
 
+sub done_db {
+    log::l("closing install.log file");
+    close LOG;
+}
+
 sub getHeader($) {
     my ($p) = @_;
 
-- 
cgit v1.2.1