revert bogus part of last commit

31 files changed, 33 insertions, 33 deletions

diff --git a/lib/network/connection/cable.pm b/lib/network/connection/cable.pm
index 5df3320..a81ae06 100644
--- a/lib/network/connection/cable.pm
+++ b/lib/network/connection/cable.pm
@@ -2,7 +2,7 @@ package network::connection::cable;
 
 use base qw(network::connection::ethernet);
 
-
+use strict;
 use common;
 use modules;
 use detect_devices;
diff --git a/lib/network/connection/cellular.pm b/lib/network/connection/cellular.pm
index c10d52b..5bb2259 100644
--- a/lib/network/connection/cellular.pm
+++ b/lib/network/connection/cellular.pm
@@ -2,7 +2,7 @@ package network::connection::cellular;
 
 use base qw(network::connection::ppp);
 
-
+use strict;
 use common;
 
 my $cellular_d = "/etc/sysconfig/network-scripts/cellular.d";
diff --git a/lib/network/connection/cellular_bluetooth.pm b/lib/network/connection/cellular_bluetooth.pm
index 21ea07d..5c99b63 100644
--- a/lib/network/connection/cellular_bluetooth.pm
+++ b/lib/network/connection/cellular_bluetooth.pm
@@ -2,7 +2,7 @@ package network::connection::cellular_bluetooth;
 
 use base qw(network::connection::cellular);
 
-
+use strict;
 use common;
 
 my $rfcomm_dev_prefix = "/dev/rfcomm";
diff --git a/lib/network/connection/cellular_card.pm b/lib/network/connection/cellular_card.pm
index 951b84e..0fc3fbf 100644
--- a/lib/network/connection/cellular_card.pm
+++ b/lib/network/connection/cellular_card.pm
@@ -2,7 +2,7 @@ package network::connection::cellular_card;
 
 use base qw(network::connection::cellular);
 
-
+use strict;
 use common;
 
 my $wrong_pin_error = N_("Wrong PIN number format: it should be 4 digits.");
diff --git a/lib/network/connection/dvb.pm b/lib/network/connection/dvb.pm
index 618bfba..c5f8ff6 100644
--- a/lib/network/connection/dvb.pm
+++ b/lib/network/connection/dvb.pm
@@ -2,7 +2,7 @@ package network::connection::dvb;
 
 use base qw(network::connection::ethernet);
 
-
+use strict;
 use common;
 use modules;
 
diff --git a/lib/network/connection/ethernet.pm b/lib/network/connection/ethernet.pm
index aeb70f9..7b76396 100644
--- a/lib/network/connection/ethernet.pm
+++ b/lib/network/connection/ethernet.pm
@@ -2,7 +2,7 @@ package network::connection::ethernet; # $Id: ethernet.pm 147431 2007-03-21 17:0
 
 use base qw(network::connection);
 
-
+use strict;
 use common;
 use network::tools;
 
diff --git a/lib/network/connection/isdn.pm b/lib/network/connection/isdn.pm
index 9cdd363..1b8debc 100644
--- a/lib/network/connection/isdn.pm
+++ b/lib/network/connection/isdn.pm
@@ -2,7 +2,7 @@ package network::connection::isdn;
 
 use base qw(network::connection);
 
-
+use strict;
 use common;
 
 sub get_type_name { N("ISDN") }
diff --git a/lib/network/connection/isdn/consts.pm b/lib/network/connection/isdn/consts.pm
index 8a989cb..a53ddbe 100644
--- a/lib/network/connection/isdn/consts.pm
+++ b/lib/network/connection/isdn/consts.pm
@@ -1,5 +1,5 @@
 package network::connection::isdn::consts; # $Id: consts.pm 54070 2006-08-07 17:34:38Z blino $
-
+use vars qw(@ISA @EXPORT);
 @ISA = qw(Exporter);
 @EXPORT = qw(@isdndata @isdn_capi);
 
diff --git a/lib/network/connection/pots.pm b/lib/network/connection/pots.pm
index f5d19fb..22299f6 100644
--- a/lib/network/connection/pots.pm
+++ b/lib/network/connection/pots.pm
@@ -2,7 +2,7 @@ package network::connection::pots;
 
 use base qw(network::connection::ppp);
 
-
+use strict;
 use common;
 
 sub get_type_name {
diff --git a/lib/network/connection/ppp.pm b/lib/network/connection/ppp.pm
index c83b7fa..37fabb3 100644
--- a/lib/network/connection/ppp.pm
+++ b/lib/network/connection/ppp.pm
@@ -1,6 +1,6 @@
 package network::connection::ppp;
 
-
+use strict;
 use common;
 
 use base qw(network::connection);
diff --git a/lib/network/connection/wireless.pm b/lib/network/connection/wireless.pm
index 83b62c3..4f86f17 100644
--- a/lib/network/connection/wireless.pm
+++ b/lib/network/connection/wireless.pm
@@ -2,7 +2,7 @@ package network::connection::wireless;
 
 use base qw(network::connection::ethernet);
 
-
+use strict;
 use common;
 use log;
 use network::network;
diff --git a/lib/network/connection/xdsl.pm b/lib/network/connection/xdsl.pm
index 03b1080..e55dd24 100644
--- a/lib/network/connection/xdsl.pm
+++ b/lib/network/connection/xdsl.pm
@@ -2,7 +2,7 @@ package network::connection::xdsl;
 
 use base qw(network::connection::ppp);
 
-
+use strict;
 use common;
 
 sub get_type_name() { N("DSL") }
diff --git a/lib/network/connection_manager.pm b/lib/network/connection_manager.pm
index b8252ea..3efb2c1 100644
--- a/lib/network/connection_manager.pm
+++ b/lib/network/connection_manager.pm
@@ -1,6 +1,6 @@
 package network::connection_manager;
 
-
+use strict;
 
 use common;
 use run_program;
diff --git a/lib/network/dhcpd.pm b/lib/network/dhcpd.pm
index ac7438d..8cf30d5 100644
--- a/lib/network/dhcpd.pm
+++ b/lib/network/dhcpd.pm
@@ -1,6 +1,6 @@
 package network::dhcpd;
 
-
+use strict;
 use common;
 
 my $sysconf_dhcpd = "$::prefix/etc/sysconfig/dhcpd";
diff --git a/lib/network/drakfirewall.pm b/lib/network/drakfirewall.pm
index eeb90f4..f22ecfe 100644
--- a/lib/network/drakfirewall.pm
+++ b/lib/network/drakfirewall.pm
@@ -1,7 +1,7 @@
 package network::drakfirewall; # $Id: drakfirewall.pm 268043 2010-04-30 13:29:37Z blino $
 
-
-
+use strict;
+use diagnostics;
 
 use network::shorewall;
 use common;
diff --git a/lib/network/drakroam.pm b/lib/network/drakroam.pm
index 8478178..9ff8189 100755
--- a/lib/network/drakroam.pm
+++ b/lib/network/drakroam.pm
@@ -5,7 +5,7 @@ package network::drakroam;
 # Olivier Blin, 2005-2006 <oblin@mandriva.com>
 # Licensed under the GPL
 
-
+use strict;
 
 use common;
 use interactive;
diff --git a/lib/network/drakvpn.pm b/lib/network/drakvpn.pm
index b5e9897..c68127d 100644
--- a/lib/network/drakvpn.pm
+++ b/lib/network/drakvpn.pm
@@ -14,7 +14,7 @@ network::drakvpn - Interactive VPN configuration
 
 =cut
 
-
+use strict;
 use common;
 
 use network::vpn;
diff --git a/lib/network/modem.pm b/lib/network/modem.pm
index 7bb7a77..b7fbc85 100644
--- a/lib/network/modem.pm
+++ b/lib/network/modem.pm
@@ -1,6 +1,6 @@
 package network::modem;	# $Id: modem.pm 243081 2008-06-25 15:44:25Z blino $
 
-
+use strict;
 use common;
 use any;
 use modules;
diff --git a/lib/network/ndiswrapper.pm b/lib/network/ndiswrapper.pm
index 821db25..22af6d6 100644
--- a/lib/network/ndiswrapper.pm
+++ b/lib/network/ndiswrapper.pm
@@ -1,6 +1,6 @@
 package network::ndiswrapper;
 
-
+use strict;
 use common;
 use modules;
 use detect_devices;
diff --git a/lib/network/netcenter.pm b/lib/network/netcenter.pm
index 37981a4..10d156d 100755
--- a/lib/network/netcenter.pm
+++ b/lib/network/netcenter.pm
@@ -4,7 +4,7 @@
 
 package network::netcenter;
 
-
+use strict;
 use common;
 use mygtk2;
 use ugtk2 qw(:create :helpers :wrappers);
diff --git a/lib/network/netconnect.pm b/lib/network/netconnect.pm
index e258b98..abe94c7 100644
--- a/lib/network/netconnect.pm
+++ b/lib/network/netconnect.pm
@@ -1,6 +1,6 @@
 package network::netconnect; # $Id: netconnect.pm 259351 2009-08-17 15:15:51Z tv $
 
-
+use strict;
 use common;
 use log;
 use detect_devices;
diff --git a/lib/network/network.pm b/lib/network/network.pm
index f7638a3..565e438 100644
--- a/lib/network/network.pm
+++ b/lib/network/network.pm
@@ -4,14 +4,14 @@ package network::network; # $Id: network.pm 268044 2010-04-30 13:31:34Z blino $w
 #- misc imports
 #-######################################################################################
 
-
+use strict;
 
 use lang;
 use Socket;
 use common;
 use run_program;
 use network::tools;
-
+use vars qw(@ISA @EXPORT);
 use log;
 
 our $network_file = "/etc/sysconfig/network";
diff --git a/lib/network/nfs.pm b/lib/network/nfs.pm
index 42cdb30..93df7ab 100644
--- a/lib/network/nfs.pm
+++ b/lib/network/nfs.pm
@@ -1,6 +1,6 @@
 package network::nfs;
 
-
+use strict;
 use common;
 
 sub read_nfs_ports {
diff --git a/lib/network/rfswitch.pm b/lib/network/rfswitch.pm
index caf68b1..4617990 100644
--- a/lib/network/rfswitch.pm
+++ b/lib/network/rfswitch.pm
@@ -1,6 +1,6 @@
 package network::rfswitch;
 
-
+use strict;
 use MDK::Common;
 use detect_devices;
 
diff --git a/lib/network/squid.pm b/lib/network/squid.pm
index bed4f87..427bce3 100644
--- a/lib/network/squid.pm
+++ b/lib/network/squid.pm
@@ -1,6 +1,6 @@
 package network::squid;
 
-
+use strict;
 use common;
 
 our $squid_conf_file = "$::prefix/etc/squid/squid.conf";
diff --git a/lib/network/test.pm b/lib/network/test.pm
index ae06ac2..0bd1231 100644
--- a/lib/network/test.pm
+++ b/lib/network/test.pm
@@ -1,6 +1,6 @@
 package network::test;          # $Id: test.pm 219797 2007-05-25 15:39:46Z blino $
 
-
+use strict;
 use common;
 use run_program;
 use Socket;
diff --git a/lib/network/thirdparty.pm b/lib/network/thirdparty.pm
index 8c04aa5..8fd48ab 100644
--- a/lib/network/thirdparty.pm
+++ b/lib/network/thirdparty.pm
@@ -1,6 +1,6 @@
 package network::thirdparty;
 
-
+use strict;
 use common;
 use detect_devices;
 use run_program;
diff --git a/lib/network/tools.pm b/lib/network/tools.pm
index c2c4df5..de8261d 100644
--- a/lib/network/tools.pm
+++ b/lib/network/tools.pm
@@ -1,6 +1,6 @@
 package network::tools; # $Id: tools.pm 253976 2009-03-13 10:57:55Z eugeni $
 
-
+use strict;
 use common;
 use run_program;
 use c;
diff --git a/lib/network/vpn.pm b/lib/network/vpn.pm
index 08c9a45..4a5afbc 100644
--- a/lib/network/vpn.pm
+++ b/lib/network/vpn.pm
@@ -6,7 +6,7 @@ network::vpn - VPN connection abstract class
 
 =cut
 
-
+use strict;
 use common;
 
 my $vpn_d = "/etc/sysconfig/network-scripts/vpn.d";
diff --git a/lib/network/vpn/openvpn.pm b/lib/network/vpn/openvpn.pm
index 1b1f9f6..68e1b3f 100644
--- a/lib/network/vpn/openvpn.pm
+++ b/lib/network/vpn/openvpn.pm
@@ -2,7 +2,7 @@ package network::vpn::openvpn;
 
 use base qw(network::vpn);
 
-
+use strict;
 use common;
 
 sub get_type { 'openvpn' }
diff --git a/lib/network/vpn/vpnc.pm b/lib/network/vpn/vpnc.pm
index b0162dc..c7a87c7 100644
--- a/lib/network/vpn/vpnc.pm
+++ b/lib/network/vpn/vpnc.pm
@@ -2,7 +2,7 @@ package network::vpn::vpnc;
 
 use base qw(network::vpn);
 
-
+use strict;
 use common;
 
 sub get_type { 'vpnc' }