!7

set flag DynModule.

sclass Recording {
  File file, clippedFile;
  S text;
}

sclass AudioRecordings extends DynObjectTable<Recording> {
  start {
    setData(map(allRecordings(), func(File f) -> Recording {
      nu(Recording, file := f, clippedFile := fileIfExists(fileInSubDir(f, "clipped")), text := wordFromAudioFileName(f.getName()))
    }));
  }
}