[dw-free] Sample invite code distribution broken

[afuna]

[commit: http://hg.dwscoalition.org/dw-free/rev/ad11c0cbdc54]

http://bugs.dwscoalition.org/show_bug.cgi?id=1558

Hash, not object.

Patch by kareila.

Files modified:

• cgi-bin/DW/BusinessRules/InviteCodes.pm

--------------------------------------------------------------------------------
diff -r f8258bcea589 -r ad11c0cbdc54 cgi-bin/DW/BusinessRules/InviteCodes.pm
--- a/cgi-bin/DW/BusinessRules/InviteCodes.pm	Sat Aug 08 14:48:08 2009 +0000
+++ b/cgi-bin/DW/BusinessRules/InviteCodes.pm	Sat Aug 08 14:50:11 2009 +0000
@@ -134,7 +134,9 @@ sub search_class {
 
     while (my $row = $sth->fetchrow_hashref) {
         push @uids, $row->{userid}
-            if $row->is_person && $row->{status} eq 'A' && $row->is_visible;
+            if $row->{journaltype} eq 'P'
+               && $row->{status} eq 'A'
+               && $row->{statusvis} eq 'V';
         $max_nusers--;
     }
 
@@ -149,7 +151,9 @@ sub search_class {
 
     while (my $row = $sth->fetchrow_hashref) {
         push @uids, $row->{userid}
-            if $row->is_person && $row->{status} eq 'A' && $row->is_visible;
+            if $row->{journaltype} eq 'P'
+               && $row->{status} eq 'A'
+               && $row->{statusvis} eq 'V';
         $max_nusers--;
     }
 
--------------------------------------------------------------------------------