bugfixes to find a tester feature.

barbie · May 28, 2010 · 82ee35d · 82ee35d
1 parent dc6c864
commit 82ee35d
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 2 deletions.
diff --git a/Changes b/Changes
@@ -3,6 +3,7 @@ Revision history for CPAN-Testers-WWW-Statistics
 0.85    28/05/2010
 	- added missing.html for missing in action PAUSE accounts.
 	- extended the stats of cpan to provide milestones.
+	- bugfixes to find a tester feature.
 
 0.84    20/04/2010
         - fixed ranges() to return correct ranges for a range ending on or 

diff --git a/templates/cgi-bin/cpanmail.cgi b/templates/cgi-bin/cpanmail.cgi
@@ -76,7 +76,7 @@ if($tvars{id} || $tvars{guid}) {
         $tvars{nntpid} = guid_to_nntp($tvars{guid});
         $found = retrieve_from_nntp($tvars{nntpid});
     } else {
-        $found = 5;
+        $found ||= 5;
     }
 } else {
     $found = 3;
@@ -115,7 +115,7 @@ sub retrieve_from_db {
     if(defined $hash{id}) {
         $sql = "SELECT * FROM cpanstats WHERE id=$hash{id}";
     } elsif(defined $hash{guid}) {
-        $sql = "SELECT * FROM cpanstats WHERE guid=$hash{guid}";
+        $sql = "SELECT * FROM cpanstats WHERE guid='$hash{guid}'";
     }
 
     my @rows = $dbh->get_query('hash',$sql);