!7

p {
  File odt = loadLibrary(#1009364);
  L<S> tok = htmlTok(loadTextFileFromZip(odt, "content.xml"));
  
  // load styles
  for (L<S> tag : findContainerTag(tok, "style:style")) {
    S style = xml_getArg(tag, "style:name");
    S props = findTag(tag, "style:graphic-properties");
    S start = xml_getArg(props, "draw:marker-start");
    S end = xml_getArg(props, "draw:marker-end");
    print("Style " + style + " arrow? " + start + " - " + end);
  }
  
  for (L<S> tag : findContainerTag(tok, "draw:custom-shape")) {
    S style = xml_getArg(tag, "draw:style-name");
    DoubleRect rect = libreOffice_rect(tag);
    print("\nCustom shape, style=" + style + ", rect: " + rect);
    print("  " + join(tag));
    pnl(libreOffice_textP(tag));
  }
  
  for (L<S> tag : findContainerTag(tok, "draw:line")) {
    S style = xml_getArg(tag, "draw:style-name");
    DoublePt pt1 = libreOffice_pt1(tag);
    DoublePt pt2 = libreOffice_pt2(tag);
    print("\nLine, style=" + style + ", pt1: " + pt1 + ", pt2: " + pt2);
    print("  " + join(tag));
    pnl(libreOffice_textP(tag));
  }
}

Began life as a copy of #1009179