static L<TextImageAction> moduleLibraryForNiceButtons(L<S> list, final VF1<S> action) {
  final SS iconMap = mechMap("Icons for modules");
  ret map(list, func(fS line) -> TextImageAction {
    fL<S> l = splitAtSlash(line);
    S moduleID = first(l);
    TextImageAction tia = textImageActionToolTip(
      line,
      #1101288,
      r { pcallF(action, line) },
      moduleID);
    tia.more = litmapOrNull(lazyImageID :=
      lookup_first(iconMap, line, moduleID, last(l)));
    ret tia;
  });
}

Began life as a copy of #1015366