!7

concept Domain {
  S domain;
  S moduleLibID;
}

cmodule Eleu3 > DynEleu {
  start {
    dbIndexingCI(Domain, 'domain);
  }
  
  @Override 
  S moduleForDomain(S domain) {  
    Domain domainObj = conceptWhereCI(Domain, domain := dropPrefixIC("www.", domain));
    if (domainObj == null) null;
    ret dm_findModule(domainObj.moduleLibID);
  }
}