5), $arguments, 'tsml_next_meetings');
$meetings = tsml_get_meetings(array('day' => intval(current_time('w')), 'time' => 'upcoming'));
if (!count($meetings)) return false;
//usort($meetings, 'tsml_next_meetings_sort');
$meetings = array_slice($meetings, 0, $arguments['count']);
$rows = '';
foreach ($meetings as $meeting) {
if (is_array($meeting['types'])) {
$flags = array();
foreach ($tsml_programs[$tsml_program]['flags'] as $flag) {
if (in_array($flag, $meeting['types'])) {
$flags[] = $tsml_programs[$tsml_program]['types'][$flag];
}
}
if (count($flags)) {
sort($flags);
$meeting['name'] .= '' . implode(', ', $flags) . '';
}
}
$rows .= '
| ' . tsml_format_time($meeting['time']) . ' |
' . @$meeting['name'] . ' |
' . @$meeting['location'] . ' |
' . (@$meeting['sub_region'] ? @$meeting['sub_region'] : @$meeting['region']) . ' |
';
}
return '
| ' . __('Time', '12-step-meeting-list') . ' |
' . __('Meeting', '12-step-meeting-list') . ' |
' . __('Location', '12-step-meeting-list') . ' |
' . __('Region', '12-step-meeting-list') . ' |
' . $rows . '
';
}
}
add_shortcode('tsml_next_meetings', 'tsml_next_meetings');
//output a list of types with links for AA-DC
if (!function_exists('tsml_types_list')) {
function tsml_types_list() {
global $tsml_types_in_use, $tsml_programs, $tsml_program;
$types = array();
$base = get_post_type_archive_link('tsml_meeting') . '?tsml-day=any&tsml-type=';
foreach ($tsml_types_in_use as $type) {
$types[$tsml_programs[$tsml_program]['types'][$type]] = '' . $tsml_programs[$tsml_program]['types'][$type] . '';
}
ksort($types);
return 'Types
';
}
}
add_shortcode('tsml_types_list', 'tsml_types_list');
//output a list of regions with links for AA-DC
if (!function_exists('tsml_regions_list')) {
function tsml_regions_list() {
//run function recursively
function get_regions($parent=0) {
$taxonomy = 'tsml_region';
$terms = get_terms(compact('taxonomy', 'parent'));
if (!count($terms)) return;
$base = get_post_type_archive_link('tsml_meeting') . '?tsml-day=any&tsml-region=';
foreach ($terms as &$term) {
$term = '' . $term->name . '' . get_regions($term->term_id) . '';
}
return '';
}
return 'Regions
' . get_regions();
}
}
add_shortcode('tsml_regions_list', 'tsml_regions_list');