[Popcon-commits] cvs commit to popularity-contest by ballombe

[ballombe at cvs.alioth.debian.org]

Update of /cvsroot/popcon/popularity-contest
In directory haydn:/tmp/cvs-serv9771

Modified Files:
	popcon-upload 
Log Message:
popcon-upload: parse server output for success as it is received instead
of waiting for the socket to close which might happen after the timeout,
thuse reporting spurious failure. (Closes: #350934). Thanks Javier Kohen.


Index: popcon-upload
===================================================================
RCS file: /cvsroot/popcon/popularity-contest/popcon-upload,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -d -r1.5 -r1.6
--- popcon-upload	20 Jul 2005 07:52:28 -0000	1.5
+++ popcon-upload	7 Apr 2006 13:42:59 -0000	1.6
@@ -95,7 +95,11 @@
 
 #Get answer
 my($answer)="";
-$answer.=$_ while(<$remote>);
+while(<$remote>)
+{
+  $answer.=$_;
+  m/DEBIAN POPCON HTTP-POST OK/ and last;
+}
 close ($remote);
 #Check answer
 my $status = ($answer =~ m/DEBIAN POPCON HTTP-POST OK/) ? 0 : 1;