From 4d618435769f15dbfd976e99a27a4bacf922bfab Mon Sep 17 00:00:00 2001
From: Daouda Lo <daouda@mandriva.com>
Date: Wed, 3 Mar 2004 16:28:00 +0000
Subject: s/box/machine/

---
 mdkapplet | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

(limited to 'mdkapplet')

diff --git a/mdkapplet b/mdkapplet
index a4c0a79f..7ac3007d 100755
--- a/mdkapplet
+++ b/mdkapplet
@@ -177,9 +177,11 @@ sub silentCheck {
     $ua->agent("MdkAppletAgent/0.1" . $ua->agent);
     $ua->env_proxy;
     #    my $request = HTTP::Request->new(GET => $link . '&log=' . "ayomigration" . '&host=' . "online");
-    my $request = HTTP::Request->new(GET => $link . '&log=' . $h{LOGIN} . '&host=' . $h{BOX});
+    my $request = HTTP::Request->new(GET => $link . '&log=' . $h{LOGIN} . '&host=' . $h{MACHINE});
+    my $lnk = $link . '&log=' . $h{LOGIN} . '&host=' . $h{MACHINE};
     my $response = $ua->request($request);
     my $ct = $response->content;
+    print "\nCONTENTS = $ct; link = $lnk \n";
     if ($ct =~ /rpm/) { $u = 11 } elsif ($ct =~ m/(\d+)/) { $u = sprintf("%d",$1); } else { $u = 10 };
     #   99 - log or host or action or pass empty, wrong action
     #   98 - wrong pass
@@ -238,6 +240,7 @@ sub isNetwork {
 }
 sub configure {
     system "/usr/sbin/mdkonline &";
+    
 }
 sub getSite {
     my $b = browser();
-- 
cgit v1.2.1