!7

cmodule LatestModules > DynObjectTable<Snippet> {
  start {
    itemToMap = func(Snippet s) -> Map {
      litorderedmap("ID" := s.id, "Name" := s.title)
    };
    
    dm_onSnippetTranspiled(voidfunc(S snippetID) {
      if (getSnippetType(snippetID) == snippetType_dynModule())
        setData(
          takeFirst(3, listPlus_inFront(withoutObjectsHaving(data, id := snippetID), Snippet(snippetID, getSnippetTitle(snippetID)))));
    });
  }
  
  afterVisualize {
    tableDefaultAction(table(), "Make Module", rThread {
      dm_makeOrShowModuleFromSnippetID(selected().id)
    });
  }
}