From 6b2dfe5b978f10d4c47dbf3f386419a4624718ca Mon Sep 17 00:00:00 2001
From: damien <damien@mandriva.com>
Date: Tue, 6 Mar 2001 01:57:50 +0000
Subject: added enable/disable networking button.

---
 perl-install/standalone/draknet | 17 ++++++++++-------
 1 file changed, 10 insertions(+), 7 deletions(-)

(limited to 'perl-install')

diff --git a/perl-install/standalone/draknet b/perl-install/standalone/draknet
index 252b73aa6..051b20e24 100755
--- a/perl-install/standalone/draknet
+++ b/perl-install/standalone/draknet
@@ -31,10 +31,6 @@ use c;
 my $xpm_path="/usr/share/libDrakX/pixmaps";
 $::isEmbedded = ($::XID, $::CCPID) = "@ARGV" =~ /--embedded (\w+) (\w+)/;
 $::isWizard = "@ARGV" =~ /--wizard/;
-print "EMBED\n" if $::isEmbedded;
-print "XID : $::XID\n";
-print "CCPID :  $::CCPID\n";
-print "wiz : $::isWizard\n";
 
 local $_ = join '', @ARGV;
 
@@ -428,8 +424,16 @@ sub configure_lan {
 	$notebook->append_page($vbox_local, $hbox_local);
     }
     my $bbox1 = new Gtk::HButtonBox;
-    $vbox1->pack_start($bbox1,0,0,0);
+    $vbox1->pack_start($bbox1,0,0,10);
     $bbox1->set_layout(-end);
+    my $old_networking = $netc->{NETWORKING};
+    my $button_able = new Gtk::Button $netc->{NETWORKING} eq "yes" ? _("Disable") : _("Enable");
+    $button_able->signal_connect ( clicked => sub {
+				       $netc->{NETWORKING} eq "yes" ? ($netc->{NETWORKING} = "no") : ($netc->{NETWORKING} = "yes");
+				       $notebook->set_sensitive($netc->{NETWORKING} eq "yes");
+				       $button_able->child->set($netc->{NETWORKING} eq "yes" ? _("Disable") : _("Enable"));
+				   } );
+    $bbox1->add($button_able);
     my $button_ok = new Gtk::Button "OK";
     $button_ok->signal_connect ( clicked => sub {
 				     my $i=0;
@@ -443,7 +447,7 @@ sub configure_lan {
 				 });
     $bbox1->add($button_ok);
     my $button_cancel = new Gtk::Button "Cancel";
-    $button_cancel->signal_connect ( clicked => sub { $window->destroy(); Gtk->main_quit });
+    $button_cancel->signal_connect ( clicked => sub { $netc->{NETWORKING}=$old_networking; $window->destroy(); Gtk->main_quit });
     $bbox1->add($button_cancel);
 
     $window->set_modal(1);
@@ -539,7 +543,6 @@ sub configure_net {
 @mask=(0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0) if ($netcnx->{type}eq'modem'||$netcnx->{type} eq 'isdn_external');
 @mask=(0, 0, 0, 0, 0, 0, 1, 0, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0) if $netcnx->{type} =~ 'adsl';
 @mask=(0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1) if $netcnx->{type} eq 'cable';
-#    @mask=(1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0) if $netcnx->{type} eq '' && $cnx->{card_type} eq 'isa';
     $vbox1->pack_start(new Gtk::HSeparator,0,0,5);
 
 
-- 
cgit v1.2.1