start_page("$section graphs");
foreach my $group (@{ $section_groups{$section} }) {
- my $elems= $group_elems{$section,$group};
- if (@$elems > 1) { print "<table><tr><td>"; }
print a({href=>"$self?detail=$group§ion=$section"});
my $imgurl= "$self?graph=$group§ion=$section";
+ print "<span style=\"white-space:nowrap\">";
+ my $elems= $group_elems{$section,$group};
foreach my $elem (@$elems) {
my $g= $graphs{$section,$group,$elem};
print img({src=>"$imgurl&elem=$elem&sloth=".($sloth + $g->{Slower}),
alt=>''});
}
+ print "</span>";
print "</a>\n";
- if (@$elems > 1) { print "</td></tr></table>"; }
}