more html fixups

diff --git a/cgi b/cgi
index dc3137c6be667b84455d885d31359c00d677a42d..9aee6434928c7a58fe56465616b054546e645ba1 100755 (executable)
--- a/cgi
+++ b/cgi
@@ -297,7 +297,8 @@ if ($detail) {
            my $tsloth= $xsloth + $g->{Slower};
            my $imgurl= "$self?graph=$detail&section=$section".
                "&sloth=$tsloth&elem=$elem";
-           print a({href=>"$imgurl&w=780&h=800"}, img({src=>$imgurl}));
+           print a({href=>"$imgurl&w=780&h=800"},
+                   img({src=>$imgurl, alt=>''}));
        }
     }
     print end_html();
@@ -327,15 +328,16 @@ if (param('debug')) {
 start_page("$section graphs");
 
 foreach my $group (@{ $section_groups{$section} }) {
-    print a({href=>"$self?detail=$group&section=$section"});
-    my $imgurl= "$self?graph=$group&section=$section";
     my $elems= $group_elems{$section,$group};
     if (@$elems > 1) { print "<table><tr><td>"; }
+    print a({href=>"$self?detail=$group&section=$section"});
+    my $imgurl= "$self?graph=$group&section=$section";
     foreach my $elem (@$elems) {
        my $g= $graphs{$section,$group,$elem};
-       print img({src=>"$imgurl&elem=$elem&sloth=".($sloth + $g->{Slower})});
+       print img({src=>"$imgurl&elem=$elem&sloth=".($sloth + $g->{Slower}),
+                  alt=>''});
     }
-    if (@$elems > 1) { print "</td></tr></table>"; }
     print "</a>\n";
+    if (@$elems > 1) { print "</td></tr></table>"; }
 }