[%- default_headers = {
meta => {
name => {
author => 'docs-dev (at) perl.apache.org',
keywords => 'mod_perl modperl perl cgi apache webserver speed fast guide mod_perl asf parent apache guide help info faq mod_perl installation cgi troubleshooting help no sex speedup child rules free open source OSS mod_perl speed suck apache guide manual troubleshoot cgi fast apache sexy',
classification => 'information',
},
'http-equiv' => {
'Content-Type' => 'text/html; charset=iso-8859-1',
},
},
link => "<link href=\"${doc.dir.abs_doc_root}/style.css\" rel=\"stylesheet\" type=\"text/css\" title=\"refstyle\">",
};
abstract = doc.meta.abstract or "Manuals, Hints, Guidelines, Scenarios, Troubleshooting and Help";
-%]
[% IF doc.headers.base -%]
<base href="[% doc.headers.base | uri | html %]">
[%- END -%]
[%- " $l\n" FOREACH l = [ doc.headers.link, default_headers.link ] -%]
<meta name="description" content="mod_perl documentation: [% abstract | html %]">
[%- FOREACH m = ["name", "http-equiv"];
SET merge = {};
merge.import(default_headers.meta.$m); # deep copy
merge.import(doc.headers.meta.$m); # merge
FOREACH key = merge.keys; %]
<meta [% m %]="[% key %]" content="[% merge.$key | html %]">
[%- END;
END -%]