From ed3346324e07044720b6c0b5b3e94ddb416244d0 Mon Sep 17 00:00:00 2001 From: Daouda Lo Date: Fri, 19 Mar 2004 10:21:48 +0000 Subject: - s/ret/u/ var --- mdkupdate | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'mdkupdate') diff --git a/mdkupdate b/mdkupdate index d1f6e5c4..d24d593a 100755 --- a/mdkupdate +++ b/mdkupdate @@ -73,9 +73,9 @@ if ($o{LOGIN} && $o{PASS} && $o{LOGIN} !~ /\s+/ && $o{PASS} !~ /\s+/) { my $MandrakeUpdateURL = $url->{online3_RemoteAction} . '?action=ScheduledRPM' . '&log=' . $o{LOGIN} . '&pass=' . $o{PASS} . '&host=' . $o{MACHINE} . '&key=' . $o{CURRENTKEY}; my $resp = getFromURL($MandrakeUpdateURL); my $contents = $resp->content; - print " \n\n ***** Response from Online3_RemoteAction is : \n $contents \n end update_rpms answer **********\n\n"; + print "CONTENTS=$contents"; if ($resp->is_success) { - if ($contents =~ /TRUE/) { $ret = 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 { print "\nCONTENTS = $contents \n"; -- cgit v1.2.1