diff options
| author | Thierry Vignaud <tvignaud@mandriva.org> | 2004-01-16 23:03:08 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tvignaud@mandriva.org> | 2004-01-16 23:03:08 +0000 |
| commit | 12ebbae40ca3705d55c7251a786aacacfb1ed165 (patch) | |
| tree | 48c17f49f5c1ac53baf24e93eb15b71f094fd24e /perl-install/standalone/drakconnect | |
| parent | 7827b38a5d474b21e7f03b42ceee3d3edc70984f (diff) | |
| download | drakx-12ebbae40ca3705d55c7251a786aacacfb1ed165.tar drakx-12ebbae40ca3705d55c7251a786aacacfb1ed165.tar.gz drakx-12ebbae40ca3705d55c7251a786aacacfb1ed165.tar.bz2 drakx-12ebbae40ca3705d55c7251a786aacacfb1ed165.tar.xz drakx-12ebbae40ca3705d55c7251a786aacacfb1ed165.zip | |
kill unused variables
Diffstat (limited to 'perl-install/standalone/drakconnect')
| -rwxr-xr-x | perl-install/standalone/drakconnect | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/perl-install/standalone/drakconnect b/perl-install/standalone/drakconnect index 99e451891..b4c4e366c 100755 --- a/perl-install/standalone/drakconnect +++ b/perl-install/standalone/drakconnect @@ -42,10 +42,8 @@ use network::adsl; use MDK::Common::Globals "network", qw($in $prefix $disconnect_file $connect_prog $connect_file); use POSIX ":sys_wait_h"; -my $xpm_path = "/usr/share/libDrakX/pixmaps"; - my ($netcnx, $netc, $intf) = ({}, {}, {}); -my @conx_type = ('modem', 'isdn_internal', 'isdn_external', 'adsl', 'cable', 'lan'); +#my @conx_type = ('modem', 'isdn_internal', 'isdn_external', 'adsl', 'cable', 'lan'); my $in = 'interactive'->vnew('su'); if ($in->isa('interactive::gtk')) { @@ -90,7 +88,7 @@ $window1->{rwindow}->set_border_width(10); my $warning_label1; -my ($lan_button, $wiz_button, $int_button, $host_button, $button_apply); +my ($lan_button, $host_button, $button_apply); my $hostname = chomp_(`hostname`); @@ -129,7 +127,7 @@ $list->signal_connect(button_press_event => sub { update_list(); -my ($label_host, $int_state, $button_expert); +my ($label_host, $int_state); $window1->{window}->add( |