]> ruin.nu Git - ndwebbie.git/blobdiff - NDWeb/Pages/Users.pm
Use list_context variables instead of homebrewed ODD
[ndwebbie.git] / NDWeb / Pages / Users.pm
index e0d48e67783bfb6fc92f9c974427bb92be609cbc..232c4232b520a664722c5d62fe2c9913e2acecff 100644 (file)
@@ -131,10 +131,7 @@ sub render_body {
                        ORDER BY lower(username)})or $error .= $DBH->errstr;
                $query->execute or $error .= $DBH->errstr;
                my @users;
-               my $i = 0;
                while (my $user = $query->fetchrow_hashref){
-                       $i++;
-                       $user->{ODD} = $i % 2;
                        push @users, $user;
                }
                $BODY->param(Users => \@users);