aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgarciasuarez@mandriva.org>2004-07-23 10:08:13 +0000
committerRafael Garcia-Suarez <rgarciasuarez@mandriva.org>2004-07-23 10:08:13 +0000
commit6a57417701acb7ba923784aaebdd371c4e4b09f3 (patch)
treeafa8a04484dc9d40e7536ef907a95708d5988227
parent573f0cb61ad78eafe8ebd1285fd61549f7973275 (diff)
downloadrpmdrake-6a57417701acb7ba923784aaebdd371c4e4b09f3.tar
rpmdrake-6a57417701acb7ba923784aaebdd371c4e4b09f3.tar.gz
rpmdrake-6a57417701acb7ba923784aaebdd371c4e4b09f3.tar.bz2
rpmdrake-6a57417701acb7ba923784aaebdd371c4e4b09f3.tar.xz
rpmdrake-6a57417701acb7ba923784aaebdd371c4e4b09f3.zip
In rpmdrake, explain that you can't select some packages because they
belong to the skip list.
-rwxr-xr-xrpmdrake18
1 files changed, 12 insertions, 6 deletions
diff --git a/rpmdrake b/rpmdrake
index b0842b71..a0bae5fa 100755
--- a/rpmdrake
+++ b/rpmdrake
@@ -585,10 +585,16 @@ or you already installed all of them."));
@nodes = difference2(\@nodes, \@bad_i18n_pkgs);
}
my @requested;
- slow_func($tree->window,
- sub { @requested = $urpm->resolve_requested(db(), $urpm->{state},
- { map { $pkgs->{$_}{pkg}->id => 1 } @nodes },
- callback_choices => $callback_choices) });
+ slow_func(
+ $tree->window,
+ sub {
+ @requested = $urpm->resolve_requested(
+ db(), $urpm->{state},
+ { map { $pkgs->{$_}{pkg}->id => 1 } @nodes },
+ callback_choices => $callback_choices,
+ );
+ },
+ );
@nodes_with_deps = map { my_fullname($_) } @requested;
if (!$deps_msg->(N("Additional packages needed"),
N("To satisfy dependencies, the following package(s) also need\nto be installed:\n\n"),
@@ -602,10 +608,10 @@ or you already installed all of them."));
my @ask_unselect = $urpm->unselected_packages($urpm->{state});
my @reasons = map {
my $cant = $_;
- my $unsel = find { remove_arch($_) eq $cant } @ask_unselect;
+ my $unsel = find { remove_arch($_) eq $cant } @ask_unselect;
$unsel
? to_utf8(join "\n", $urpm->translate_why_unselected($urpm->{state}, $unsel))
- : $cant;
+ : ($pkgs->{$_}{pkg}->flag_skip ? N("%s (belongs to the skip list)", $cant) : $cant);
} @cant;
interactive_msg_(N("Some packages can't be installed"),
N("Sorry, the following package(s) can't be selected:\n\n%s", join("\n", @reasons)));