font: include version in font name hover

[sheet.git] / font.plp

diff --git a/font.plp b/font.plp
index 5e81234ecd4f750c578161b6edbbb9e51822ae00..1d6ee4f104dbab6c28eb133e1f0f37d166adf35a 100644 (file)
--- a/font.plp
+++ b/font.plp
@@ -81,8 +81,10 @@ printf '<td colspan=%d>%s fonts', scalar @{ $cover->{os}->{$_} }, $_
 
 print '<tr>';
 print '<th colspan=2>';
-printf '<td title="%s">%s', $_->{name}, $_->{abbr}
-       for @{ $cover->{fonts} }[@fontlist];
+printf('<td title="%s">%s', map { EscapeHTML($_) }
+       join("\n", $_->{name}, $_->{description}),
+       $_->{abbr},
+) for @{ $cover->{fonts} }[@fontlist];
 say '</thead>';
 
 for (@rows) {