diff options
Diffstat (limited to 'perl-install/standalone')
| -rwxr-xr-x | perl-install/standalone/scannerdrake | 26 |
1 files changed, 12 insertions, 14 deletions
diff --git a/perl-install/standalone/scannerdrake b/perl-install/standalone/scannerdrake index 61e92e692..2731505d0 100755 --- a/perl-install/standalone/scannerdrake +++ b/perl-install/standalone/scannerdrake @@ -635,13 +635,12 @@ sub sharewindow { cancel => "", }, # List the hosts - [ if_($#list >= 0, - { val => \$choice, format => \&translate, - sort => 0, separator => "####", - tree_expanded => 1, - quit_if_double_click => 1, - allow_empty_list => 1, - list => \@list }), + [ { val => \$choice, format => \&translate, + sort => 0, separator => "####", + tree_expanded => 1, + quit_if_double_click => 1, + allow_empty_list => 1, + list => \@list }, { val => N("Add host"), type => 'button', clicked_may_quit => sub { @@ -786,13 +785,12 @@ sub sharewindow { cancel => "", }, # List the hosts - [ if_($#list >= 0, - { val => \$choice, format => \&translate, - sort => 0, separator => "####", - tree_expanded => 1, - quit_if_double_click => 1, - allow_empty_list => 1, - list => \@list }), + [ { val => \$choice, format => \&translate, + sort => 0, separator => "####", + tree_expanded => 1, + quit_if_double_click => 1, + allow_empty_list => 1, + list => \@list }, { val => N("Add host"), type => 'button', clicked_may_quit => sub { |