sclass HMultiCRUD extends HAbstractRenderable {
  Concepts cc = db_mainConcepts();
  L<Class<? extends Concept>> classes;
  bool mutationRights;
  
  *(S *baseLink, Class<? extends Concept>... classes) {
    this(classes);
  }
  
  *(Class<? extends Concept>... classes) {
    this.classes = asList(classes);
  }
  
  S renderNavi() {
    ret p(joinWithVBar(map(classes, c -> ahref(baseLinkPlus(shortName(c)), shortName(c)))));
  }

  O renderPage(S uri, SS params) {
    LS parts = tok_splitAtSlash_nempties(uri);
    ret renderNavi();
    //ret "parts: " + sfu(parts);
  }
}