static LS dm_deleteAllModulesWithSnippetID(S snippetID) {
  new LS deletedModules;
  for (O m : dm_modulesWithSnippetID(snippetID)) pcall {
    S id = dm_moduleID(m);
    dm_deleteModule(id);
    deletedModules.add(id);
  }
  ret deletedModules;
}