summaryrefslogtreecommitdiffstats
path: root/perl-install/network
diff options
context:
space:
mode:
authorDamien Chaumette <dchaumette@mandriva.com>2003-02-21 17:17:57 +0000
committerDamien Chaumette <dchaumette@mandriva.com>2003-02-21 17:17:57 +0000
commit3c6d0e9bf117e1554eea560e7900b3c5b197ed68 (patch)
treea27be2e60523c23ca7adb50b7e9ba2675b575e08 /perl-install/network
parentacd74fc476091b451a50ea7628868b0e761223c5 (diff)
downloaddrakx-backup-do-not-use-3c6d0e9bf117e1554eea560e7900b3c5b197ed68.tar
drakx-backup-do-not-use-3c6d0e9bf117e1554eea560e7900b3c5b197ed68.tar.gz
drakx-backup-do-not-use-3c6d0e9bf117e1554eea560e7900b3c5b197ed68.tar.bz2
drakx-backup-do-not-use-3c6d0e9bf117e1554eea560e7900b3c5b197ed68.tar.xz
drakx-backup-do-not-use-3c6d0e9bf117e1554eea560e7900b3c5b197ed68.zip
oups... hu... nothing
Diffstat (limited to 'perl-install/network')
-rw-r--r--perl-install/network/netconnect.pm2
-rw-r--r--perl-install/network/tools.pm2
2 files changed, 1 insertions, 3 deletions
diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm
index 507c8613e..698ff49d5 100644
--- a/perl-install/network/netconnect.pm
+++ b/perl-install/network/netconnect.pm
@@ -12,8 +12,6 @@ use network;
use network::tools;
use MDK::Common::Globals "network", qw($in $prefix $connect_file $disconnect_file $connect_prog);
-use Data::Dumper;
-
my %conf;
#- intro is called only in standalone.
sub intro {
diff --git a/perl-install/network/tools.pm b/perl-install/network/tools.pm
index d1c533a2f..1d96fc839 100644
--- a/perl-install/network/tools.pm
+++ b/perl-install/network/tools.pm
@@ -131,7 +131,7 @@ sub ask_info2 {
if__($cnx->{speed}, { label => N("Connection speed"), val => \$cnx->{speed}, list => ["64 Kb/s", "128 Kb/s"] }),
if__($cnx->{huptimeout}, { label => N("Connection timeout (in sec)"), val => \$cnx->{huptimeout} }),
{ label => N("Account Login (user name)"), val => \$cnx->{login} },
- if__($cnx->{passwd}, { label => N("Account Password"), val => \$cnx->{passwd}, hidden => 1 }),
+ { label => N("Account Password"), val => \$cnx->{passwd}, hidden => 1 },
]
) or return;
if ($netc->{vpivci}) {