ad_partner_format_font

ad_partner_format_font   face   color   props

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