summaryrefslogtreecommitdiffstats
path: root/perl-install/install/media.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2007-09-28 14:18:43 +0000
committerPascal Rigaux <pixel@mandriva.com>2007-09-28 14:18:43 +0000
commit1f626fa1e14be15cf257b0138233ed53dc3ddf56 (patch)
treef81f22f76c7c117aed4509015729798319a798b6 /perl-install/install/media.pm
parentc4e78781ef4f73d104cb2d5b79ff3dd40de70ee6 (diff)
downloaddrakx-1f626fa1e14be15cf257b0138233ed53dc3ddf56.tar
drakx-1f626fa1e14be15cf257b0138233ed53dc3ddf56.tar.gz
drakx-1f626fa1e14be15cf257b0138233ed53dc3ddf56.tar.bz2
drakx-1f626fa1e14be15cf257b0138233ed53dc3ddf56.tar.xz
drakx-1f626fa1e14be15cf257b0138233ed53dc3ddf56.zip
- log_sizes: cleanup __db* files
Diffstat (limited to 'perl-install/install/media.pm')
-rw-r--r--perl-install/install/media.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/install/media.pm b/perl-install/install/media.pm
index 85dcaaf66..d889f9141 100644
--- a/perl-install/install/media.pm
+++ b/perl-install/install/media.pm
@@ -1011,6 +1011,7 @@ sub log_sizes() {
log::l(sprintf "Installed: %dMB(df), %dMB(rpm)",
($df[0] - $df[1]) / 1024,
sum(run_program::rooted_get_stdout($::prefix, 'rpm', '-qa', '--queryformat', '%{size}\n')) / 1024 / 1024) if -x "$::prefix/bin/rpm";
+ install::pkgs::clean_rpmdb_shared_regions();
}
1;