From b422de522b74cc7c730c535357c837693bed0da5 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Sat, 14 Feb 2004 01:53:31 +0000 Subject: fix crash on canceling "already configured net device" configuration (#7679) --- perl-install/network/tools.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/perl-install/network/tools.pm b/perl-install/network/tools.pm index e10518d78..4a39028d3 100644 --- a/perl-install/network/tools.pm +++ b/perl-install/network/tools.pm @@ -11,8 +11,8 @@ use MDK::Common::System qw(getVarsFromSh); @EXPORT = qw(connect_backend connected connected_bg disconnect_backend is_dynamic_ip passwd_by_login read_providers_backend read_secret_backend set_cnx_script test_connected write_cnx_script write_initscript write_secret_backend); our $connect_prog = "/etc/sysconfig/network-scripts/net_cnx_pg"; -my $connect_file = "/etc/sysconfig/network-scripts/net_cnx_up"; -my $disconnect_file = "/etc/sysconfig/network-scripts/net_cnx_down"; +our $connect_file = "/etc/sysconfig/network-scripts/net_cnx_up"; +our $disconnect_file = "/etc/sysconfig/network-scripts/net_cnx_down"; sub set_cnx_script { my ($netc, $type, $up, $down, $type2) = @_; -- cgit v1.2.1