summaryrefslogtreecommitdiffstats
path: root/perl-install/pkgs.pm
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2000-11-21 09:59:21 +0000
committerFrancois Pons <fpons@mandriva.com>2000-11-21 09:59:21 +0000
commit9aeb805dea0dc431331f1175f4fb3bed367e4684 (patch)
treea3771fbe184f1577a17ecadce70ad36d6f58bc2c /perl-install/pkgs.pm
parent07e8572d9d5280867732fe881b9e7bd030988207 (diff)
downloaddrakx-backup-do-not-use-9aeb805dea0dc431331f1175f4fb3bed367e4684.tar
drakx-backup-do-not-use-9aeb805dea0dc431331f1175f4fb3bed367e4684.tar.gz
drakx-backup-do-not-use-9aeb805dea0dc431331f1175f4fb3bed367e4684.tar.bz2
drakx-backup-do-not-use-9aeb805dea0dc431331f1175f4fb3bed367e4684.tar.xz
drakx-backup-do-not-use-9aeb805dea0dc431331f1175f4fb3bed367e4684.zip
cosmetic changes for upgrade, removing some logs.
Diffstat (limited to 'perl-install/pkgs.pm')
-rw-r--r--perl-install/pkgs.pm4
1 files changed, 1 insertions, 3 deletions
diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm
index c35bb22d7..4ff05f593 100644
--- a/perl-install/pkgs.pm
+++ b/perl-install/pkgs.pm
@@ -775,6 +775,7 @@ sub init_db {
log::l("\tdone");
if ($isUpgrade) {
+ log::l("rebuilding rpm database");
c::rpmdbRebuild($prefix) or die "rebuilding of rpm database failed: ", c::rpmErrorString();
}
#- seems no more necessary to rpmdbInit ?
@@ -824,11 +825,9 @@ sub selectPackagesAlreadyInstalled {
}
});
- log::l("before closing db");
#- close db, job finished !
c::rpmdbClose($db);
log::l("done selecting packages to upgrade");
-
}
sub selectPackagesToUpgrade($$$;$$) {
@@ -1083,7 +1082,6 @@ sub selectPackagesToUpgrade($$$;$$) {
});
}
- log::l("before closing db");
#- close db, job finished !
c::rpmdbClose($db);
log::l("done selecting packages to upgrade");