!7

p {
  File zipFile = programFile("mech-public-" + ymdWithMinuses() + ".zip");
  //dir2zip(remoteMechListMirrorsDir(), zipFile);
  ZipOutputStream zipOut = zipOutputStream(zipFile);
  for (S name : namesOfLocalMechListCopies()) {
    Map meta = unstructMap_pcall(loadTextFile(remoteMechListMirrorMetaFile(name)));
    if (cic(getString(meta, "Status"), "PUBLIC READ"))
      zip_addFilesInBaseDir(zipOut, ll(remoteMechListMirrorMetaFile(name), remoteMechListMirrorFile(name)));
  }
  zipOut.close();
  uploadFileToFileServer(zipFile, zipFile.getName());
}