X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/701d8b4edb385c8a122a88ddfcfa28ffb5903962..20ca68ae05fb47fc98efa06bb675df13d4c94de5:/dieren.plp

diff --git a/dieren.plp b/dieren.plp
index 4d0ee93..f7935fe 100644
--- a/dieren.plp
+++ b/dieren.plp
@@ -32,16 +32,21 @@ $Request ||= 'standaard';
 my $pageinfo = $subpages{$Request}
 	or Html(), Abort("Onbekende dierenpagina <q>$Request</q>", '404 request not found');
 
+my $proto = sprintf('http%s://', !!$ENV{HTTPS} && 's');
+my $preview = "$proto$ENV{HTTP_HOST}/dieren.jpg";
+
 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
 		relatie vernoemd vernoeming combinatie samenstelling voorvoegsel onverwant
 		land zee lucht  animals dutch language
 	'],
-	raw => <<'EOT',
+	raw => <<"EOT",
+<meta property="og:image" content="$preview" />
 <style>
 figure[hidden] {
 	opacity: 0; /* secret */
@@ -56,7 +61,7 @@ figure[hidden]:hover > figcaption {
 	transition-delay: 2s;
 }
 
-@media (max-width: 60em) {
+\@media (max-width: 60em) {
 	td, th {
 		font-size: 50%;
 	}
@@ -72,7 +77,7 @@ EOT
 });
 
 :>
-<h1>Dierennamen <small>(Dutch animal names)</small></h1>
+<h1>Dierennamen <small lang=en>(Dutch animal names)</small></h1>
 
 <p>
 <:
@@ -82,7 +87,7 @@ say $pageinfo->{altlink};
 </p>
 
 <:
-my $table = readdata('dieren');
+my $table = Data('dieren');
 
 if (exists $get{r}) {
 	use List::MoreUtils qw( part );