From 8ba6484055478436467a60cab9d9c76c181ff157 Mon Sep 17 00:00:00 2001 From: Frederic Lepied Date: Thu, 20 May 2004 16:52:35 +0000 Subject: corrected error reporting check --- mdkupdate | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'mdkupdate') diff --git a/mdkupdate b/mdkupdate index 9a0af7df..fba9ec0f 100755 --- a/mdkupdate +++ b/mdkupdate @@ -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); -- cgit v1.2.1