diff options
| author | Till Kamppeter <tkamppeter@mandriva.com> | 2005-08-24 15:32:34 +0000 |
|---|---|---|
| committer | Till Kamppeter <tkamppeter@mandriva.com> | 2005-08-24 15:32:34 +0000 |
| commit | 6ff062ef326d4fd1afedb080a82f0c6cc5d7aeb9 (patch) | |
| tree | 7ab9850ed5a38285a5f3cee862fc3eb0756ee337 /perl-install | |
| parent | d54c1557c01a38d6f45e9c9c20bae831c487f173 (diff) | |
| download | drakx-backup-do-not-use-6ff062ef326d4fd1afedb080a82f0c6cc5d7aeb9.tar drakx-backup-do-not-use-6ff062ef326d4fd1afedb080a82f0c6cc5d7aeb9.tar.gz drakx-backup-do-not-use-6ff062ef326d4fd1afedb080a82f0c6cc5d7aeb9.tar.bz2 drakx-backup-do-not-use-6ff062ef326d4fd1afedb080a82f0c6cc5d7aeb9.tar.xz drakx-backup-do-not-use-6ff062ef326d4fd1afedb080a82f0c6cc5d7aeb9.zip | |
- Reverted workarounds for bug #17718, the bug is now really fixed,
the problem was in /usr/lib/libDrakX/interactive/gtk.pm.
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/printer/printerdrake.pm | 26 | ||||
| -rwxr-xr-x | perl-install/standalone/scannerdrake | 26 |
2 files changed, 24 insertions, 28 deletions
diff --git a/perl-install/printer/printerdrake.pm b/perl-install/printer/printerdrake.pm index ea67cd001..dfab0d70f 100644 --- a/perl-install/printer/printerdrake.pm +++ b/perl-install/printer/printerdrake.pm @@ -164,13 +164,12 @@ If some of these measures lead to problems for you, turn this option off, but th cancel => "", }, # List the hosts - [ if_($#{$sharehosts->{list}} >= 0, - { val => \$choice, format => \&translate, - sort => 0, separator => "####", - tree_expanded => 1, - quit_if_double_click => 1, - allow_empty_list => 1, - list => $sharehosts->{list} }), + [ { val => \$choice, format => \&translate, + sort => 0, separator => "####", + tree_expanded => 1, + quit_if_double_click => 1, + allow_empty_list => 1, + list => $sharehosts->{list} }, { val => N("Add host/network"), type => 'button', clicked_may_quit => sub { @@ -350,13 +349,12 @@ N("Examples for correct IPs:\n") . cancel => "", }, # List the hosts - [ if_($#{$browsepoll->{list}} >= 0, - { val => \$choice, format => \&translate, - sort => 0, separator => "####", - tree_expanded => 1, - quit_if_double_click => 1, - allow_empty_list => 1, - list => $browsepoll->{list} }), + [ { val => \$choice, format => \&translate, + sort => 0, separator => "####", + tree_expanded => 1, + quit_if_double_click => 1, + allow_empty_list => 1, + list => $browsepoll->{list} }, { val => N("Add server"), type => 'button', clicked_may_quit => sub { 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 { |