!7

p {
  File zip = loadBinarySnippet(#1400000);
  for (S name : listZip(zip)) {
    if (isImageFileName(name)) {
      if (!dirContainsFile(screenClipsDir(), name))
        extractFileFromZipVerbose(zip, name, screenClipsDir());
    } else if (eqic(name, "glyph-teaching.txt"))
      mergeLinesIntoGlyphTeachLog(loadTextFileFromZip(zip, name));
  }
}