termcol: dosbox colour emulation presets
[sheet.git] / dieren.plp
index 4d0ee93c83a9557522d7c3e01065846d56514c30..d9833b2b97e8327907455368cddbad6d08a7d074 100644 (file)
@@ -34,7 +34,8 @@ my $pageinfo = $subpages{$Request}
 
 Html({
        title => $pageinfo->{title}.' cheat sheet',
-       version => '1.0',
+       version => '1.1',
+       lang => 'nl',
        description => "Tabeloverzicht met afbeeldingen van $pageinfo->{intro}",
        keywords => [qw'
                dier beest naam naamgeving woord taal nederlands gerelateerd
@@ -72,7 +73,7 @@ EOT
 });
 
 :>
-<h1>Dierennamen <small>(Dutch animal names)</small></h1>
+<h1>Dierennamen <small lang=en>(Dutch animal names)</small></h1>
 
 <p>
 <:
@@ -82,7 +83,7 @@ say $pageinfo->{altlink};
 </p>
 
 <:
-my $table = readdata('dieren');
+my $table = Data('dieren');
 
 if (exists $get{r}) {
        use List::MoreUtils qw( part );