diff options
author | Olivier Blin <oblin@mandriva.org> | 2005-04-29 12:52:56 +0000 |
---|---|---|
committer | Olivier Blin <oblin@mandriva.org> | 2005-04-29 12:52:56 +0000 |
commit | ec5b572036ee02d05242a84d5c861df74326733d (patch) | |
tree | 48e43c1000e992e91b2211bf954f6440951e3615 /perl-install/network/test.pm | |
parent | fb323e3ec7ac1137c9049b4ecfebb679c7db91c5 (diff) | |
download | drakx-ec5b572036ee02d05242a84d5c861df74326733d.tar drakx-ec5b572036ee02d05242a84d5c861df74326733d.tar.gz drakx-ec5b572036ee02d05242a84d5c861df74326733d.tar.bz2 drakx-ec5b572036ee02d05242a84d5c861df74326733d.tar.xz drakx-ec5b572036ee02d05242a84d5c861df74326733d.zip |
use www.mandriva.com to test connection
Diffstat (limited to 'perl-install/network/test.pm')
-rw-r--r-- | perl-install/network/test.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/network/test.pm b/perl-install/network/test.pm index e442d61cb..2ba8538c6 100644 --- a/perl-install/network/test.pm +++ b/perl-install/network/test.pm @@ -8,7 +8,7 @@ use Socket; sub new { my ($class, $o_hostname) = @_; bless { - hostname => $o_hostname || "mandrakesoft.com" + hostname => $o_hostname || "www.mandriva.com" }, $class; } @@ -111,7 +111,7 @@ sub update_status { =head2 Test synchronously -#- resolve and get ping to hostname from command line if given, else to Mandriva +#- resolve and get ping to hostname from command line if given, else to www.mandriva.com use lib qw(/usr/lib/libDrakX); use network::test; |