Iterate on tr not tbody in process_pb

diff --git a/lib/Plack/App/Gruntmaster/HTML.pm b/lib/Plack/App/Gruntmaster/HTML.pm
index 8f47616eaf4e9446ee550c774b62e60972e49e2b..117d1b4be5ac7f2567394ca8d9d4522621f0cc1b 100644 (file)
--- a/lib/Plack/App/Gruntmaster/HTML.pm
+++ b/lib/Plack/App/Gruntmaster/HTML.pm
@@ -188,7 +188,7 @@ sub process_pb {
                my ($data, $div) = @_;
                $div->attr(id => $data);
                $div->find('h2')->replace_content(ucfirst $data);
-               $div->find('tbody')->iter3($args{$data}, $titer);
+               $div->find('tbody')->find('tr')->iter3($args{$data}, $titer);
        };
        $tree->fid('beginner')->iter3([grep {$args{$_}} qw/beginner easy medium hard/], $iter);
 }