From f9defd5e2657b91f974887cbfd0e43acc7e61082 Mon Sep 17 00:00:00 2001 From: Daouda Lo Date: Mon, 20 Sep 2004 05:43:30 +0000 Subject: - Send password clearly (not fine!) --- mdkonline | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'mdkonline') diff --git a/mdkonline b/mdkonline index 3769a73d..44b2539b 100755 --- a/mdkonline +++ b/mdkonline @@ -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) { -- cgit v1.2.1