summaryrefslogtreecommitdiffstats
path: root/urpm
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2012-03-05 19:01:37 +0000
committerThierry Vignaud <tv@mageia.org>2012-03-05 19:01:37 +0000
commit065fc607088c62a58dc6a8b5e8faf0c169440be7 (patch)
tree2536b008b206783cf1d496d0d076fb2cb7e2e29f /urpm
parent91678a3bd2f6d6ae5ff9b56e62a0e79a8b87b322 (diff)
downloadurpmi-065fc607088c62a58dc6a8b5e8faf0c169440be7.tar
urpmi-065fc607088c62a58dc6a8b5e8faf0c169440be7.tar.gz
urpmi-065fc607088c62a58dc6a8b5e8faf0c169440be7.tar.bz2
urpmi-065fc607088c62a58dc6a8b5e8faf0c169440be7.tar.xz
urpmi-065fc607088c62a58dc6a8b5e8faf0c169440be7.zip
warn if --allow-force, --allow-nodeps, --force or --keep is in use (mga#3127)
Diffstat (limited to 'urpm')
-rw-r--r--urpm/select.pm8
1 files changed, 4 insertions, 4 deletions
diff --git a/urpm/select.pm b/urpm/select.pm
index e90602a5..02cadbde 100644
--- a/urpm/select.pm
+++ b/urpm/select.pm
@@ -674,12 +674,12 @@ sub should_we_migrate_back_rpmdb_db_version {
my ($pkg) = urpm::select::selected_packages_providing($urpm, $state, 'rpm') or return;
urpm::select::was_pkg_name_installed($state->{rejected}, 'rpm') and return;
- my ($rooted_librpm_version) = map { _libdb_version($_) } $pkg->requires;
- my $rooted_rpm_version = eval "v" . $pkg->version;
+ my ($rooted_librpm_version) = map { _libdb_version($_) } $pkg->requires; # perl_checker: $self = revision
+ my $rooted_rpm_version = eval "v" . $pkg->version; # perl_checker: $self = revision
- my $urpmi_librpm_version = _libdb_version(scalar `ldd /bin/rpm`);
+ my $urpmi_librpm_version = _libdb_version(scalar `ldd /bin/rpm`); # perl_checker: $self = revision
- if (_rpm_version() ge v4.9.0) {
+ if (_rpm_version() ge v4.9.0) { # perl_checker: $self = revision
if ($rooted_rpm_version && $rooted_rpm_version ge v4.9) {
$urpm->{debug} and $urpm->{debug}("chrooted db version used by librpm is at least as good as non-rooted one");
} else {