diff options
| author | Thierry Vignaud <tvignaud@mandriva.org> | 2003-01-23 10:21:53 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tvignaud@mandriva.org> | 2003-01-23 10:21:53 +0000 |
| commit | d5ac99d987c49dc81aab14b6ff0a811a1a84adf2 (patch) | |
| tree | 61ee379ebc9e9a6370361cd80329686abfb47016 | |
| parent | 7f0d56e47d3c6d230fe1a96aaa8066567bbfb4d8 (diff) | |
| download | drakx-backup-do-not-use-d5ac99d987c49dc81aab14b6ff0a811a1a84adf2.tar drakx-backup-do-not-use-d5ac99d987c49dc81aab14b6ff0a811a1a84adf2.tar.gz drakx-backup-do-not-use-d5ac99d987c49dc81aab14b6ff0a811a1a84adf2.tar.bz2 drakx-backup-do-not-use-d5ac99d987c49dc81aab14b6ff0a811a1a84adf2.tar.xz drakx-backup-do-not-use-d5ac99d987c49dc81aab14b6ff0a811a1a84adf2.zip | |
force strict mode
| -rw-r--r-- | perl-install/network/isdn.pm | 1 | ||||
| -rw-r--r-- | perl-install/network/modem.pm | 1 | ||||
| -rw-r--r-- | perl-install/network/netconnect.pm | 3 | ||||
| -rw-r--r-- | perl-install/network/network.pm | 1 | ||||
| -rw-r--r-- | perl-install/network/shorewall.pm | 2 | ||||
| -rw-r--r-- | perl-install/network/tools.pm | 1 |
6 files changed, 7 insertions, 2 deletions
diff --git a/perl-install/network/isdn.pm b/perl-install/network/isdn.pm index 62d23c628..ba5477867 100644 --- a/perl-install/network/isdn.pm +++ b/perl-install/network/isdn.pm @@ -1,5 +1,6 @@ package network::isdn; + use network::isdn_consts; use common; use any; diff --git a/perl-install/network/modem.pm b/perl-install/network/modem.pm index ca4aca8f2..823883bd0 100644 --- a/perl-install/network/modem.pm +++ b/perl-install/network/modem.pm @@ -1,5 +1,6 @@ package network::modem; +use strict; use common; use any; use modules; diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm index 1c10b680a..d1ab55e68 100644 --- a/perl-install/network/netconnect.pm +++ b/perl-install/network/netconnect.pm @@ -1,5 +1,6 @@ package network::netconnect; +use strict; use common; use log; use detect_devices; @@ -199,7 +200,7 @@ If you don't want to use the auto detection, deselect the checkbox. load_conf($netcnx, $netc, $intf); $conf{modem} and do { pre_func("modem"); require network::modem; network::modem::configure($in, $netcnx, $mouse, $netc, $intf) or goto step_2 }; $conf{winmodem} and do { pre_func("winmodem"); require network::modem; network::modem::winmodemConfigure($in, $netc) or goto step_2 }; - $conf{isdn} and do { pre_func("isdn"); require network::isdn; network::isdn::configure($netcnx, $netc, $isdn) or goto step_2 }; + $conf{isdn} and do { pre_func("isdn"); require network::isdn; network::isdn::configure($netcnx, $netc, undef) or goto step_2 }; $conf{adsl} and do { pre_func("adsl"); require network::adsl; network::adsl::configure($netcnx, $netc, $intf, $first_time) or goto step_2 }; $conf{cable} and do { pre_func("cable"); require network::ethernet; network::ethernet::configure_cable($netcnx, $netc, $intf, $first_time) or goto step_2; $netconnect::need_restart_network = 1 }; $conf{lan} and do { pre_func("local network"); require network::ethernet; network::ethernet::configure_lan($netcnx, $netc, $intf, $first_time) or goto step_2; $netconnect::need_restart_network = 1 }; diff --git a/perl-install/network/network.pm b/perl-install/network/network.pm index 8101859af..ee129007f 100644 --- a/perl-install/network/network.pm +++ b/perl-install/network/network.pm @@ -3,6 +3,7 @@ package network::network; # $Id$wir #-###################################################################################### #- misc imports #-###################################################################################### +use strict; use Socket; use common; diff --git a/perl-install/network/shorewall.pm b/perl-install/network/shorewall.pm index a1fcf5aba..6f01bca0a 100644 --- a/perl-install/network/shorewall.pm +++ b/perl-install/network/shorewall.pm @@ -2,7 +2,7 @@ package network::shorewall; # $Id$ - +use strict; use detect_devices; use network::netconnect; use run_program; diff --git a/perl-install/network/tools.pm b/perl-install/network/tools.pm index acaae8cad..6db983f9a 100644 --- a/perl-install/network/tools.pm +++ b/perl-install/network/tools.pm @@ -1,5 +1,6 @@ package network::tools; +use strict; use common; use run_program; use c; |