diff options
| -rw-r--r-- | perl-install/install_any.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index 05939b2a8..8aad17682 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -1197,7 +1197,7 @@ sub is_installed { my ($do, @l) = @_; foreach (@l) { my $p = pkgs::packageByName($do->{o}{packages}, $_); - $p && $p->flag_selected or return; + $p && $p->flag_available or return; } 1; } @@ -1206,7 +1206,7 @@ sub are_installed { my ($do, @l) = @_; grep { my $p = pkgs::packageByName($do->{o}{packages}, $_); - $p && $p->flag_selected; + $p && $p->flag_available; } @l; } |