aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGuillaume Cottenceau <gc@mandriva.com>2002-09-12 16:05:45 +0000
committerGuillaume Cottenceau <gc@mandriva.com>2002-09-12 16:05:45 +0000
commit1170fbf74471bdcf9ae0cf8b15f0359e1f40a713 (patch)
tree76e35dfd4917fe4e534b4ca3e9e82946d149000f
parentfcbb5809c6aa1c5e826477326a50c32c1f1e7300 (diff)
downloadrpmdrake-1170fbf74471bdcf9ae0cf8b15f0359e1f40a713.tar
rpmdrake-1170fbf74471bdcf9ae0cf8b15f0359e1f40a713.tar.gz
rpmdrake-1170fbf74471bdcf9ae0cf8b15f0359e1f40a713.tar.bz2
rpmdrake-1170fbf74471bdcf9ae0cf8b15f0359e1f40a713.tar.xz
rpmdrake-1170fbf74471bdcf9ae0cf8b15f0359e1f40a713.zip
- fixes not parsing descriptions file when MU adds itself the
security source - fixes all packages are displayed when "normal" updates are selected, even "security" and "bugfix" packages
-rwxr-xr-xrpmdrake7
1 files changed, 4 insertions, 3 deletions
diff --git a/rpmdrake b/rpmdrake
index a27868df..329abc01 100755
--- a/rpmdrake
+++ b/rpmdrake
@@ -279,9 +279,8 @@ sub run_treeview_dialog {
} else {
my @keys = keys %$pkgs;
if ($MODE eq 'update') {
- member('normal', @$mandrakeupdate_wanted_categories)
- or @keys = grep { my ($name) = split_fullname($_);
- member($descriptions->{$name}{importance}, @$mandrakeupdate_wanted_categories) } @keys;
+ @keys = grep { my ($name) = split_fullname($_);
+ member($descriptions->{$name}{importance}, @$mandrakeupdate_wanted_categories) } @keys;
if (@keys == 0) {
$add_node->('', _("(none)"), { nochild => 1 });
my $explanation_only_once if 0;
@@ -757,11 +756,13 @@ Official Updates.
Do you want to try another mirror?", $r), yesno => 1) and goto mu_retry_another_mirror;
myexit(-1);
}
+ @update_medias = ({ name => $update_name }); #- hack to simulate a medium for parsing of descriptions
}
my ($cur, $section);
foreach (map { cat_("$statedir/descriptions.$_->{name}"), '%package dummy' } @update_medias) {
/^%package (.+)/ and do {
+ exists $cur->{importance} && !member($cur->{importance}, qw(security bugfix)) and $cur->{importance} = 'normal';
$update_descr{$_} = $cur foreach @{$cur->{pkgs}};
$cur = {};
$cur->{pkgs} = [ split /\s/, $1 ];