diff options
| -rw-r--r-- | perl-install/install_steps_interactive.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm index caaf43188..24a0bd235 100644 --- a/perl-install/install_steps_interactive.pm +++ b/perl-install/install_steps_interactive.pm @@ -549,7 +549,7 @@ sub chooseGroups { help => translate($o->{compssUsers}{$_}{descr}), val => \$val{$_}, type => 'bool', - icon2f => sub { + icon => do { my $f = "/usr/share/icons/" . ($o->{compssUsers}{$_}{icons} || 'default'); -e "$f.png" or $f .= "_section"; -e "$f.png" or $f = '/usr/share/icons/default_section'; |