!7

sclass AllButtons extends DynTable {
  L<Map> calc() {
    final new Map<Component, O> componentToModule;
    for (O m : dm_listModules())
      mapPut(componentToModule, dm_getVisualization(m), m);
      
    ret nonNulls(map(childrenOfType(mainDesktopPane(), JButton), func(JButton b) -> Map {
      cic(className(b), ".plaf.") ? null : litorderedmap(
        "Button" := (isEnabled(b) ? "" : "[disabled] ") + getText(b),
        "In Module" := dm_moduleName(lookupSwingAncestor(componentToModule, b)),
        //"Type" := className(b),
        "[hidden]" := b)
    }));
  }
}