Revision 4a3c5865
Added by Francisco Revilla over 13 years ago
modules/cdm_dataportal/cdm_taxontree/cdm_taxontree.module | ||
---|---|---|
467 | 467 |
} |
468 | 468 |
|
469 | 469 |
// build the the branch for the focused node and merge it with the root |
470 |
// TODO only add brancht to taxon if taxon is in current classification!!! |
|
471 |
// hint: $viewUuid = get_taxonomictree_uuid_selected(); |
|
472 |
if($taxonUuid){ |
|
470 |
$taxon_in_current_tree = taxon_in_current_tree($taxonUuid); |
|
471 |
if($taxonUuid && $taxon_in_current_tree){ |
|
473 | 472 |
$branch = cdm_taxontree_build_path($taxonUuid, NULL, (cdm_taxontree_filters_active() ? NULL : TRUE), TRUE); |
474 | 473 |
$root_tree = _cdm_taxontree_merge($root_tree, $branch); |
475 | 474 |
} |
... | ... | |
882 | 881 |
$out .= theme($tree_node_callback, $node); |
883 | 882 |
} |
884 | 883 |
|
885 |
/* |
|
886 |
foreach ($node->children as $element){ |
|
887 |
$nameStr = ''; |
|
888 |
foreach($element->taggedTitle as $tagtxt){ |
|
889 |
if($tagtxt->type == 'name' || $tagtxt->type == 'rank'){ |
|
890 |
$nameStr .= ($nameStr ? ' ' : '').$tagtxt->text; |
|
891 |
} |
|
892 |
} |
|
893 |
$nameStr = trim($nameStr); |
|
894 |
if (stristr(strtolower($tagtxt->text), 'incertae sedis') !== FALSE || |
|
895 |
stristr(strtolower($tagtxt->text), 'nomina excludenda') !== FALSE){ |
|
896 |
var_dump('PREMIO'); |
|
897 |
var_dump($element); |
|
898 |
} |
|
899 |
} |
|
900 |
*/ |
|
901 |
|
|
902 | 884 |
if($node->children && is_array($node->children)){ |
903 | 885 |
$out .= theme('cdm_taxontree', $node->children, $nextLevelIncluded, $show_filter_switch, $tree_node_callback); |
904 | 886 |
} |
Also available in: Unified diff
Ticket #1935