From 21d632055bbe913d53c3324d7465a38621d6d79e Mon Sep 17 00:00:00 2001
From: damien <damien@mandriva.com>
Date: Sun, 22 Jul 2001 19:58:06 +0000
Subject: big work on isdn. Not finished

---
 perl-install/standalone/net_monitor | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

(limited to 'perl-install/standalone')

diff --git a/perl-install/standalone/net_monitor b/perl-install/standalone/net_monitor
index 54faa40d9..294265eb9 100755
--- a/perl-install/standalone/net_monitor
+++ b/perl-install/standalone/net_monitor
@@ -26,7 +26,7 @@ use my_gtk qw(:helpers :wrappers);
 #-use Data::Dumper;
 use common qw(:common :file :functional :system);
 use strict;
-use netconnect;
+use network::netconnect;
 
 my ($connect, $default_intf);
 init Gtk;
@@ -110,16 +110,16 @@ sub connection {
     my $tag2 = Gtk->timeout_add(10000, sub {
 				    Gtk->timeout_remove($tag);
 				    $statusbar->pop(1);
-				    $statusbar->push(1, $isconnected2 ? ( netconnect::connected('', $netc) ?
+				    $statusbar->push(1, $isconnected2 ? ( network::netconnect::connected('', $netc) ?
 									  _("Disconnection from Internet failed.") :
 									  _("Disconnection from Internet complete.")) :
-						     ( netconnect::connected('', $netc) ?
+						     ( network::netconnect::connected('', $netc) ?
 						       _("Connection complete.") :
 						       _("Connection failed.\nVerify your configuration in the Mandrake Control Center."))
 						    );
 				    my $tag3 = Gtk->timeout_add(10000, sub {
 					    $statusbar->pop(1);
-					    $statusbar->push(1, netconnect::connected('', $netc) ? _("Connected") : _("Not connected"));
+					    $statusbar->push(1, network::netconnect::connected('', $netc) ? _("Connected") : _("Not connected"));
 					    0;
 					});
 				    $button_connect->set_sensitive(1);
@@ -217,11 +217,11 @@ sub update {
     }
     @interfaces = @intfs;
     my $netc={};
-    if(netconnect::connected('', $netc) == !$isconnected) {
+    if(network::netconnect::connected('', $netc) == !$isconnected) {
 	$isconnected = $isconnected ? 0 : 1;
 	$label_c->set($isconnected ? _("Disconnect") : _("Connect"));
 	$statusbar->pop(1);
-	$statusbar->push(1, netconnect::connected('', $netc) ? _("Connected") : _("Not connected"));
+	$statusbar->push(1, network::netconnect::connected('', $netc) ? _("Connected") : _("Not connected"));
 	$isconnected ? $pix_c->set($pix_c_map, $pix_c_mask) : $pix_c->set($pix_d_map, $pix_d_mask);
     }
     $time_tag2 = Gtk->timeout_add(5000, \&update);
-- 
cgit v1.2.1