diff options
author | Daouda Lo <daouda@mandriva.com> | 2003-10-17 14:25:59 +0000 |
---|---|---|
committer | Daouda Lo <daouda@mandriva.com> | 2003-10-17 14:25:59 +0000 |
commit | 6321cf990697c17e73c0a3ef5ac7136334994e89 (patch) | |
tree | ac8c5ea4a7376f4b83152c81a42a9091493888e8 | |
parent | 1916651056f6a24cd8bda171a7338e0a6d7c99c4 (diff) | |
download | mgaonline-6321cf990697c17e73c0a3ef5ac7136334994e89.tar mgaonline-6321cf990697c17e73c0a3ef5ac7136334994e89.tar.gz mgaonline-6321cf990697c17e73c0a3ef5ac7136334994e89.tar.bz2 mgaonline-6321cf990697c17e73c0a3ef5ac7136334994e89.tar.xz mgaonline-6321cf990697c17e73c0a3ef5ac7136334994e89.zip |
- comment debug LWP
-rwxr-xr-x | mdkonline | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -28,7 +28,7 @@ use common; use Config; init Gtk2; -use LWP::Debug qw(+); +#use LWP::Debug qw(+); use LWP::UserAgent; use Net::HTTPS; use HTTP::Request::Common; @@ -328,7 +328,7 @@ sub send_config { Content => [submit => "upload_wizard", wizard => ["/root/$login.$passwd.$box_name.online.log.bz2.uue"] ]); - printf("*********** Reponse is %s ***********\n", $response->as_string); + #printf("*********** Reponse is %s ***********\n", $response->as_string); # Check the outcome of the response #print "REPONSE: ".$response->content."\n"; remove_wait_msg($w); |