function make_menus_r($r)
{
static $i;
$i++;
$sty = 'border-left:1px dotted grey; margin:0 0 1px 0; padding-left:15px;';
foreach ($r as $k => $v) {
list($lk, $d) = submn_t($k);
$ret .= divc('', lka($lk, $d));
if (is_array($v)) {
$ret .= divs($sty, make_menus_r($v));
$i--;
}
}
return $ret;
}
function rub_taxo($p, $t)
{
$id = ses('read');
if ($p == 1) {
$p = $_SESSION['frm'];
} elseif ($p == 'art') {
$p = ib_of_id($id);
}
if ($p) {
$taxcat = supertriad_dig($p);
}
//permanent//$_SESSION['superline'][$p];//cache
if ($p > 1) {
$t = lka(urlread($p), suj_of_id($p)) . br();
$hie = collect_hierarchie_c(0, '');
$taxcat = find_in_subarray($hie, $p);
}
$t = build_titl($taxcat, $t, 1);
if (is_array($taxcat)) {
return $t . divc('taxonomy', make_menus_r($taxcat));
}
}
