id_noeud);
// }
//
// // après ménage de ses filles, reste-t-il des filles ?
// $total_filles = noeuds::hasChild($id_noeud);
//
// // categ utilisée en renvoi voir ?
// $total_see = noeuds::isTarget($id_noeud);
//
// // est-elle utilisée ?
// $iuse = noeuds::isUsedInNotices($id_noeud) + noeuds::isUsedinSeeALso($id_noeud);
//
// if(!$iuse && !$total_filles && !$total_see) {
// $deleted++ ;
// noeuds::delete($id_noeud);
// }
//
// } else { // la catégorie n'a pas de fille on va la supprimer si possible
// // regarder si categ utilisée
// $iuse = noeuds::isUsedInNotices($id_noeud) + noeuds::isUsedinSeeALso($id_noeud);
// if(!$iuse) {
// $deleted++ ;
// noeuds::delete($id_noeud);
// }
// }
//
//}
$v_state=urldecode($v_state);
if ($deleted=="") $deleted=0 ;
print "
".htmlentities($msg["nettoyage_suppr_categories"], ENT_QUOTES, $charset)."
";
$list_thesaurus = thesaurus::getThesaurusList();
foreach($list_thesaurus as $id_thesaurus=>$libelle_thesaurus) {
$thes = new thesaurus($id_thesaurus);
$noeud_rac = $thes->num_noeud_racine;
$r = noeuds::listChilds($noeud_rac, 0);
while($row = mysql_fetch_object($r)){
noeuds::process_categ($row->id_noeud);
}
}
//Nettoyage des informations d'autorités pour les sous collections
noeuds::delete_autority_sources();
$spec = $spec - CLEAN_CATEGORIES;
//TODO non repris >> Utilité ???
// $delete = mysql_query("delete from categories where categ_libelle='#deleted#'");
$v_state .= "
".htmlentities($msg["nettoyage_suppr_categories"], ENT_QUOTES, $charset)." : ";
$v_state .= $deleted." ".htmlentities($msg["nettoyage_res_suppr_categories"], ENT_QUOTES, $charset);
$optn = noeuds::optimize();
$optc = categories::optimize();
print "
";