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 61c65f5b4..09ce1dc09 100644 --- a/perl-install/install_steps_gtk.pm +++ b/perl-install/install_steps_gtk.pm @@ -303,7 +303,7 @@ sub choosePackagesTree { build_tree => sub { my ($add_node, $flat) = @_; if ($flat) { - foreach (sort map { $_->name } grep { !$limit_to_medium || pkgs::packageMedium($packages, $_) } + foreach (sort map { $_->name } grep { !$limit_to_medium || pkgs::packageMedium($packages, $_) == $limit_to_medium } @{$packages->{depslist}}) { $add_node->($_, undef); } |