summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone/drakconnect
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/standalone/drakconnect')
-rwxr-xr-xperl-install/standalone/drakconnect21
1 files changed, 11 insertions, 10 deletions
diff --git a/perl-install/standalone/drakconnect b/perl-install/standalone/drakconnect
index 1d34360dd..7ddccaa4e 100755
--- a/perl-install/standalone/drakconnect
+++ b/perl-install/standalone/drakconnect
@@ -66,11 +66,8 @@ MDK::Common::Globals::init(
require ugtk2;
ugtk2->import(qw(:create :dialogs :helpers :wrappers));
-network::netconnect::read_net_conf('', $netcnx, $netc);
-modules::load_category('net');
-my @all_cards = network::ethernet::conf_network_card_backend($netc, $intf);
-network::netconnect::load_conf($netcnx, $netc, $intf);
-network::network::probe_netcnx_type('', $netc, $intf, $netcnx);
+my @all_cards;
+reread_net_conf();
my $window1 = ugtk2->new('drakconnect');
$window1->{rwindow}->signal_connect(delete_event => sub { ugtk2->exit(0) });
@@ -306,11 +303,7 @@ $SIG{CHLD} = sub {
undef $wizard_pid;
sensitive_buttons(1);
$netcnx = {}; $netc = {}; $intf = {};
- network::netconnect::read_net_conf('', $netcnx, $netc);
- modules::load_category('net');
- @all_cards = network::ethernet::conf_network_card_backend($netc, $intf);
- network::netconnect::load_conf($netcnx, $netc, $intf);
- network::network::probe_netcnx_type('', $netc, $intf, $netcnx);
+ reread_net_conf();
update_profiles();
update();
};
@@ -675,3 +668,11 @@ Create one first by clicking on 'Configure'")));
$dialog->show_all;
$dialog->run;
}
+
+sub reread_net_conf {
+ network::netconnect::read_net_conf('', $netcnx, $netc);
+ modules::load_category('net');
+ @all_cards = network::ethernet::conf_network_card_backend($netc, $intf);
+ network::netconnect::load_conf($netcnx, $netc, $intf);
+ network::network::probe_netcnx_type('', $netc, $intf, $netcnx);
+}