diff options
author | Daouda Lo <daouda@mandriva.com> | 2004-03-23 16:51:04 +0000 |
---|---|---|
committer | Daouda Lo <daouda@mandriva.com> | 2004-03-23 16:51:04 +0000 |
commit | f938eb3318a5cac8ba777fdeed76bbe03ba7008b (patch) | |
tree | b06b6cffb0eddfc715fc15017b59bac9cbb8d75b /mdkapplet | |
parent | 856a4c02fa50cb1ee12fde089943ac09531ff930 (diff) | |
download | mgaonline-f938eb3318a5cac8ba777fdeed76bbe03ba7008b.tar mgaonline-f938eb3318a5cac8ba777fdeed76bbe03ba7008b.tar.gz mgaonline-f938eb3318a5cac8ba777fdeed76bbe03ba7008b.tar.bz2 mgaonline-f938eb3318a5cac8ba777fdeed76bbe03ba7008b.tar.xz mgaonline-f938eb3318a5cac8ba777fdeed76bbe03ba7008b.zip |
- no debug
Diffstat (limited to 'mdkapplet')
-rwxr-xr-x | mdkapplet | 5 |
1 files changed, 2 insertions, 3 deletions
@@ -186,7 +186,7 @@ sub silentCheck { my $lnk = $link . '&log=' . $h{LOGIN} . '&host=' . $h{MACHINE}; my $response = $ua->request($request); my $ct = $response->content; - print "\nCONTENTS = $ct\n"; + #print "\nCONTENTS = $ct\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 @@ -216,7 +216,7 @@ sub compareWithInstalled { $p =~ /(.*)-(.*)-(.*)$/; my ($n, $v, $r) = ($1, $2, $3); if ($name eq $n ) { my $iu = rpmvercmp($ver, $v); my $ir = rpmvercmp( $rel, $r); - print "$name-$ver-$rel $n-$v-$r *** CMPVER=$iu ** CMPREL = $ir \n"; + #print "$name-$ver-$rel $n-$v-$r *** CMPVER=$iu ** CMPREL = $ir \n"; if (rpmvercmp($ver, $v) > 0 || ( rpmvercmp($ver, $v) == 0 && rpmvercmp( $rel, $r) > 0)) { $isUpdate = 1 and last; } @@ -327,7 +327,6 @@ sub checkUpdates { $mLog .= N("Checking config file: Not present\n"); go2State('noconfig') } else { - print "Checking ..."; $update_label and setLabel($update_label, N("Checking for Updates...")); setLastTime(); $lastch and setLabel($lastch, lastCheck() ); |