codec: audio type with 5 lossy music formats
[sheet.git] / codec.plp
index 2349b1dc9747085742c468318d9eb41501575bfd..b2c3407f930af9c9e18e8f8c767fe25633b55d32 100644 (file)
--- a/codec.plp
+++ b/codec.plp
@@ -17,7 +17,7 @@ Html({
        '],
        stylesheet => [qw'light circus dark red'],
        data => [qw'codec.inc.pl'],
-       raw => '<style>td,th {width:10%} tbody th {white-space:nowrap}</style>',
+       raw => '<style>td,th {width:8%} tbody th {white-space:nowrap}</style>',
 });
 
 my $info = do "codec-$page.inc.pl";
@@ -60,7 +60,7 @@ while (defined (my $feat = shift @feat)) {
                        }
                }
                printf '<td class="l%d"', $score;
-               printf ' title="%s"', $_ for $title // ();
+               printf ' title="%s"', EscapeHTML($_) for $title // ();
                print '>', $data;
        }
        say '</td>';