X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/d9e583b78f0dc37673be599f60c25c788244fa5c..cd726ba1120253b6387e1a558f36ba78f3cd8cbd:/digits.plp

diff --git a/digits.plp b/digits.plp
index 2bef8f3..a6a684e 100644
--- a/digits.plp
+++ b/digits.plp
@@ -38,7 +38,7 @@ unless (exists $get{v}) {
 }
 
 my $scriptname = do 'writing-script.inc.pl';
-$_ = qq{<a href="/latin">$_</a>} for $scriptname->{latn} || ();
+$_ = showlink($_, "/latin") for $scriptname->{latn} || ();
 
 my $table = do "writing-digits.inc.pl";
 die "Table data not found: $_\n" for $@ || $! || ();
@@ -55,7 +55,6 @@ sub printtable {
 
 printtable(@{ $table->{$_} }) for @{ $table->{default} };
 
-:></div>
-
-<hr>
+say "</div>\n";
+say for '<hr/>', $glyphs->legend;