diff options
| -rw-r--r-- | perl-install/pkgs.pm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm index c6c3152c7..9c15a2ea8 100644 --- a/perl-install/pkgs.pm +++ b/perl-install/pkgs.pm @@ -848,8 +848,10 @@ sub installTransactionClosure { unless ($_->{selected}) { #- this medium is not selected, but we have to make sure no package are left #- in $id2pkg. - foreach ($_->{start} .. $_->{end}) { - delete $id2pkg->{$_}; + if (defined $_->{start} && defined $_->{end}) { + foreach ($_->{start} .. $_->{end}) { + delete $id2pkg->{$_}; + } } #- anyway, examine the next one. next; |