From 6b5577d24c6dcca9d6a5d99e8a347b1242f9b93a Mon Sep 17 00:00:00 2001
From: Daouda Lo <daouda@mandriva.com>
Date: Wed, 24 Mar 2004 15:06:27 +0000
Subject: - comment debug info

---
 mdkapplet | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'mdkapplet')

diff --git a/mdkapplet b/mdkapplet
index 7970a6b3..337a7139 100755
--- a/mdkapplet
+++ b/mdkapplet
@@ -187,7 +187,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
@@ -203,7 +203,7 @@ sub silentCheck {
 			   $cand =~ s/\.(i586|ppc|ia64).rpm//;
 			   $cand =~ /(.*)-(.*)-(.*)$/; my ($name, $ver, $rel) = ($1, $2, $3);
 			   $comp = compareWithInstalled($name, $ver, $rel, \@t);
-			   print "COMP =  $comp\n";
+			   #print "COMP =  $comp\n";
 			   if ($comp) { $isAvailable = 1; $mLog .= N("Checking... Updates are available\n"); go2State('error') and last } else { $isAvailable = 0 };
 		       }
 		       !$comp and okState();
@@ -223,7 +223,7 @@ sub compareWithInstalled {
 	if ($name eq $n) {
 	    my $iu = rpmvercmp($ver, $v); my $ir = rpmvercmp( $rel,$r); 
 	    if (rpmvercmp($ver, $v) > 0 || ( rpmvercmp($ver, $v) == 0 && rpmvercmp( $rel, $r) > 0)) {
-		print "$name-$ver-$rel $n-$v-$r *** CMPVER=$iu ** CMPREL = $ir \n";
+		#print "$name-$ver-$rel $n-$v-$r *** CMPVER=$iu ** CMPREL = $ir \n";
 		$isUpdate = 1 and last;
 	    }
 	}
-- 
cgit v1.2.1