# default fallbacks
$meta->{stylesheet} ||= [qw( light dark circus mono red )];
$meta->{charset} ||= 'utf-8';
+ $meta->{lang} ||= 'en';
# convert options to arrays
ref $_ eq 'ARRAY' or $_ = [$_]
PLP_START {
# leading output
say '<!DOCTYPE html>';
- say '<html lang="en">';
+ say qq(<html lang="$meta->{lang}">);
say '';
say '<head>';
say sprintf '<meta http-equiv="content-type" content="%s">', $_
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
});
:>
-<h1>Dierennamen <small>(Dutch animal names)</small></h1>
+<h1>Dierennamen <small lang=en>(Dutch animal names)</small></h1>
<p>
<: