diff options
| author | Frederic Lepied <flepied@mandriva.com> | 2004-05-20 16:52:35 +0000 |
|---|---|---|
| committer | Frederic Lepied <flepied@mandriva.com> | 2004-05-20 16:52:35 +0000 |
| commit | 8ba6484055478436467a60cab9d9c76c181ff157 (patch) | |
| tree | 35782f1feae9282aeb1aa3b4a539113827f0bd03 | |
| parent | d3e3f77b2256ec1f83b488c9ddfd8f3c2e758a2c (diff) | |
| download | mgaonline-8ba6484055478436467a60cab9d9c76c181ff157.tar mgaonline-8ba6484055478436467a60cab9d9c76c181ff157.tar.gz mgaonline-8ba6484055478436467a60cab9d9c76c181ff157.tar.bz2 mgaonline-8ba6484055478436467a60cab9d9c76c181ff157.tar.xz mgaonline-8ba6484055478436467a60cab9d9c76c181ff157.zip | |
corrected error reporting check
| -rwxr-xr-x | mdkupdate | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -81,7 +81,7 @@ if ($o{LOGIN} && $o{PASS} && $o{LOGIN} !~ /\s+/ && $o{PASS} !~ /\s+/) { my $contents = $resp->content; #print "CONTENTS = $contents \n"; if ($resp->is_success) { - if ($contents =~ /TRUE/) { $u = 10 } elsif ($contents = m/(\d+)/) { $u = sprintf("%d", $1) } else { $u = 83 } ; + if ($contents =~ /TRUE/) { $u = 10 } elsif ($contents =~ m/(\d+)/) { $u = sprintf("%d", $1) } else { $u = 83 } ; my $action = { 10 => sub { my $c2h = splitContents($contents); |