diff options
-rw-r--r-- | perl-install/install/NEWS | 1 | ||||
-rw-r--r-- | perl-install/install/pkgs.pm | 2 |
2 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS index 6d3d203d2..e11acc7e7 100644 --- a/perl-install/install/NEWS +++ b/perl-install/install/NEWS @@ -1,5 +1,6 @@ - retrieve package descriptions from XML meta-data instead of from huge hdlists (fix not displaying packages description in network installs) (mga#549) +- fix a crash when pressing "previous" after selecting package groups Version 14.50.1 - 15 November 2012 diff --git a/perl-install/install/pkgs.pm b/perl-install/install/pkgs.pm index ff6198ecd..8d00d1bb2 100644 --- a/perl-install/install/pkgs.pm +++ b/perl-install/install/pkgs.pm @@ -487,7 +487,7 @@ sub setSelectedFromCompssList { sub saveSelected { my ($packages) = @_; my $state = delete $packages->{state}; - my @l = @{$packages->{depslist}}; + my @l = @{$packages->{depslist} || []}; my @flags = map { ($_->flag_requested && 1) + ($_->flag_required && 2) + ($_->flag_upgrade && 4) } @l; [ $packages, $state, \@l, \@flags ]; } |