ad_partner_format_font

one of the documented procedures in this installation of the ACS
Usage:
ad_partner_format_font   face   color   props
What it does:
Returns a Defined in: /web/philip/tcl/ad-partner-defs.tcl

Source code:


    set html ""
    if { ![empty_string_p $face] } {
	append html " face=\"$face\""
    }
    if { ![empty_string_p $color] } {
	append html " color=\"$color\""
    }
    if { ![empty_string_p $props] } {
	append html " $props"
    }
    if { [empty_string_p $html] } {
	return ""
    }
    return "<font$html>"


philg@mit.edu