!7

concept Msg {
  SlackMsg msg;
  S ts;
}

// L<SlackMsg> slackSlurp(S channelID, S token, int limit, S oldest, S latest, boolean inclusive);
p {
  db();
  L<SlackMsg> msgs = slackSlurp("C4XAPALRG", celestiaToken(), 1000, null, null, true);
  for (SlackMsg msg : msgs) {
    S ts = msg.ts;
    Msg m = findConcept(Msg, +ts);
    if (m == null) {
      print("NEW: " + struct(msg));
      cset(uniq(Msg, +ts), +msg);
    }
  }
}