diff options
| author | Daouda Lo <daouda@mandriva.com> | 2004-09-20 05:43:30 +0000 |
|---|---|---|
| committer | Daouda Lo <daouda@mandriva.com> | 2004-09-20 05:43:30 +0000 |
| commit | f9defd5e2657b91f974887cbfd0e43acc7e61082 (patch) | |
| tree | a217315e2f0c004eed577b301649df0560f4a583 | |
| parent | 4831a10c2886a35f6ef63f50676a6484e26d6cbe (diff) | |
| download | mgaonline-f9defd5e2657b91f974887cbfd0e43acc7e61082.tar mgaonline-f9defd5e2657b91f974887cbfd0e43acc7e61082.tar.gz mgaonline-f9defd5e2657b91f974887cbfd0e43acc7e61082.tar.bz2 mgaonline-f9defd5e2657b91f974887cbfd0e43acc7e61082.tar.xz mgaonline-f9defd5e2657b91f974887cbfd0e43acc7e61082.zip | |
- Send password clearly (not fine!)
| -rwxr-xr-x | mdkonline | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -203,7 +203,8 @@ sub send_conf_online() { my $tag = { submit => "upload_wizard", wizard => ["$confdir/$login.$passwd.$boxname.online.log.bz2.uue"] }; remove_wait_msg($w); my $ww = wait_msg(N("Sending configuration...")); - mdkonline::hw_upload($login, $passwd, $boxname); + my $pass = $o->{passwd}->get_text; + mdkonline::hw_upload($login, $pass, $boxname); my ($res, $key) = mdkonline::send_config($link, $tag); remove_wait_msg($ww); if ($res eq 'TRUE' && $key) { |