diff options
| -rw-r--r-- | perl-install/install_steps_gtk.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm index df1e21843..7210c14a7 100644 --- a/perl-install/install_steps_gtk.pm +++ b/perl-install/install_steps_gtk.pm @@ -372,7 +372,7 @@ sub choosePackagesTree { } }, grep_allowed_to_toggle => sub { - grep { my $p = pkgs::packageByName($packages, $_); $p && !$->flag_base } @_; + grep { my $p = pkgs::packageByName($packages, $_); $p && !$p->flag_base } @_; }, grep_unselected => sub { grep { !pkgs::packageByName($packages, $_)->flag_selected } @_; |