events_pretty_venue_name db venue_idWhat it does:
returns a pretty location and that location's name based upon a venue_id. If the venue_id is invalid, returns an empty stringDefined in: /web/philip/tcl/events-defs.tcl
Source code:
set selection [ns_db 0or1row $db "select
city, usps_abbrev, iso, venue_name
from events_venues
where venue_id = $venue_id"]
if {[empty_string_p $selection]} {
return ""
}
set_variables_after_query
set pretty_location "$venue_name: "
return [append pretty_location [events_pretty_location $db $city $usps_abbrev $iso]]