ad_header_with_extra_stuff page_title { extra_stuff_for_document_head " " } { pre_content_html " " }What it does:
This is the version of the ad_header that accepts extra stuff for the document head and pre-page content htmlDefined in: /web/philip/packages/acs-core/defs-procs.tcl
Source code:
set html "<html>
<head>
$extra_stuff_for_document_head
<title>$page_title</title>
</head>
"
if { [info exists prefer_text_only_p] && $prefer_text_only_p == "f" && [ad_graphics_site_available_p] } {
append html "<body bgcolor=\"[ad_parameter bgcolor "" "white"]\" background=\"[ad_parameter background "" "/graphics/bg.gif"]\" text=\"[ad_parameter textcolor "" "black"]\">\n"
} else {
append html "<body bgcolor=[ad_parameter bgcolor "" "white"] text=[ad_parameter textcolor "" "black"]>\n"
}
append html $pre_content_html
return $html