From 3ed46857d72d2deb19027f7db3e923062f54b9e2 Mon Sep 17 00:00:00 2001 From: Daouda Lo Date: Tue, 16 Mar 2004 10:36:05 +0000 Subject: - check updates when clicked --- mdkapplet | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/mdkapplet b/mdkapplet index 6cbcdd4c..de0d449c 100755 --- a/mdkapplet +++ b/mdkapplet @@ -51,7 +51,7 @@ my %state = ( critical => { colour => [ 'orange' ], changes => [ 'okay', 'busy', 'critical', 'disconnected' ], - menu => [ 'update', 'configureApplet', 'check', 'weblink' ], + menu => [ 'configureApplet', 'check', 'weblink' ], tt => [ N("Config problems. Launch \"configure\" again") ] }, busy => { @@ -86,7 +86,7 @@ my %state = ( } ); my %actions = ( - 'update' => { name => N("Launch Mandrake Update"), launch => sub { launchUpdate() } }, + 'update' => { name => N("Launch Mandrake Update"), launch => sub { installUpdates() } }, 'configureApplet' => { name => N("Configuration"), launch => sub { configure() } }, 'check' => { name => N("Check Updates"), launch => sub { checkUpdates() } }, 'weblink' => { name => N("Online WebSite"), launch => sub { getSite() } }, @@ -183,7 +183,7 @@ sub silentCheck { my $lnk = $link . '&log=' . $h{LOGIN} . '&host=' . $h{MACHINE}; my $response = $ua->request($request); my $ct = $response->content; - print "\nCONTENTS = $ct; link = $lnk \n"; +# 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 -- cgit v1.2.1