one of the documented procedures in this installation of the ACS
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 html
Defined in: /web/philip/packages/acs-core/defs-procs.tcl

Source code:

    set html "<html>
    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