[%- 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 speedup child process rules free open source OSS mod_perl speed apache guide manual troubleshoot cgi fast apache',
classification => 'information',
},
'http-equiv' => {
'Content-Type' => 'text/html; charset=iso-8859-1',
},
},
link => "",
link_print => "",
};
abstract = doc.meta.abstract or "Manuals, Hints, Guidelines, Scenarios, Troubleshooting and Help";
-%]
[% IF doc.headers.base -%]
[%- END -%]
[%- " $l\n" FOREACH l = [ doc.headers.link, default_headers.link, default_headers.link_print ] -%]
[%- 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; %]
[%- END;
END -%]