diff options
author | damien <damien@mandriva.com> | 2001-08-10 10:49:57 +0000 |
---|---|---|
committer | damien <damien@mandriva.com> | 2001-08-10 10:49:57 +0000 |
commit | a52cf49be668244a5c48e08354f4452b64f49ae6 (patch) | |
tree | 1c71cded5c7dfcd427635134b81531ec5a6c6e27 /perl-install/standalone | |
parent | 160b5383a5e306e6beef2212fc76f8e6ede16090 (diff) | |
download | drakx-backup-do-not-use-a52cf49be668244a5c48e08354f4452b64f49ae6.tar drakx-backup-do-not-use-a52cf49be668244a5c48e08354f4452b64f49ae6.tar.gz drakx-backup-do-not-use-a52cf49be668244a5c48e08354f4452b64f49ae6.tar.bz2 drakx-backup-do-not-use-a52cf49be668244a5c48e08354f4452b64f49ae6.tar.xz drakx-backup-do-not-use-a52cf49be668244a5c48e08354f4452b64f49ae6.zip |
ifup/down ethx, anew pixmap for list
Diffstat (limited to 'perl-install/standalone')
-rwxr-xr-x | perl-install/standalone/draknet | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/perl-install/standalone/draknet b/perl-install/standalone/draknet index 4e98fa4af..2db29b9ef 100755 --- a/perl-install/standalone/draknet +++ b/perl-install/standalone/draknet @@ -472,14 +472,15 @@ Configure them first by clicking on 'Configure'")),1,1,0); $infos[2*$i+1]->set_text(${$_->[1]}); $i++; } -# $vbox_local->pack_start(gtksignal_connect(my $b = new Gtk::Button(ethisup($_) ? _("stop it") : _("start it")), clicked => -# sub {system("/sbin/if".(ethisup($_)?"up":"down")."eth$_");$_->[0]->set(ethisup($_)?_("stop it"):_("start it"));}),0,0,0); + my $c = $_; + $vbox_local->pack_start(gtksignal_connect(my $b = new Gtk::Button(ethisup($c) ? _("stop it") : _("start it")), clicked => + sub {system("/sbin/if".(ethisup($c)?"down":"up")." eth$c");gtkbuttonset($_[0], ethisup($c)?_("desactivate"):_("activate"));}),0,0,0); # $clist1->append($_+1, "eth$_", $intf->{"eth$_"}{IPADDR}, $intf->{"eth$_"}{BOOTPROTO}, $all_cards[$_]->[1]); # $clist1->set_selectable($_, 0); # require Data::Dumper; # print "------------\n" . Data::Dumper->Dump([$b],['b']) . "\n"; my $hbox_local = new Gtk::HBox(0,0); - my $pix = my_gtk::gtkpng("/usr/share/libDrakX/pixmaps/eth_card_mini.png"); + my $pix = gtkpng("/usr/share/libDrakX/pixmaps/eth_card_mini.png"); $hbox_local->pack_start($pix,0,0,0); $hbox_local->pack_start(new Gtk::Label("eth$_"),0,0,0); $hbox_local->show_all; |