private void OnSelectAndSetAsNewRoot(object sender, EventArgs e)
{
TaxonTreeNode selected = GetSelected();
TaxonUtils.CleanSubRoots();
TaxonUtils.PushSubRoot(selected);
TaxonUtils.GotoTaxon(selected);
TaxonUtils.SelectTaxon(selected);
}