!752

please include function parsePoem.

html {
  S id = dropPrefix("/", uri);
  L<Text> poems = loadPoems(id);
  L parsed = null;
  pcall { parsed = map("parsePoem", collect(poems, "lines")); }
  ret ul(
    "Snippet: " + dynamize(fsI(id)),
    "Dialogs found: " + hstructure(poems),
    "Parsed: " + hstructure(parsed)
  );
}