[livejournal] r18130: LJSUP-7716. Add 3.6. Admin/stats tools

U   trunk/htdocs/admin/comm/elections.bml

Modified: trunk/htdocs/admin/comm/elections.bml
===================================================================
--- trunk/htdocs/admin/comm/elections.bml	2011-01-27 11:07:05 UTC (rev 18129)
+++ trunk/htdocs/admin/comm/elections.bml	2011-01-27 11:32:30 UTC (rev 18130)
@@ -91,8 +91,18 @@
 
                 $ret .= "<p>Maintainers (voted already): " . $i . "</p>";
 
+                $sth = $poll->journal->prepare ("SELECT userid, args FROM inviterecv WHERE commid = ?");
+                $sth->execute ($poll->journalid);
+                while (my @row = $sth->fetchrow_array) {
+                    my $args = $row[1];
+                    next unless $args =~ m#admin=1#;
+                    push @alive_mainteiners, $row[0];
+                }
+
+                $ret .= "<p>Maintainers (total, including non-participants of the election): " . @alive_mainteiners . "</p>";
+
                 $ret .= "<br/><h3>Current state of election:</h3>";
-		$ret .= "<ul style='padding:0;list-style:none;'>";
+		        $ret .= "<ul style='padding:0;list-style:none;'>";
                 foreach my $u (values %$users) {
                     my $vote_for = $items[$result_users{$u->userid} - 1]->{item};
                     LJ::Poll->clean_poll(\$vote_for);