!7

sclass Proposition {
  S text, module;
  long date = now();
  
  [stdEq]
}

sclass ProposedVoiceOutput extends DynObjectTable<Proposition> {
  transient int expiryTime = 10000;
  
  void start {
    super.start();
    itemToMap = func(Proposition p) -> Map { humanizeKeys(objectToMap(p)) };
    doEvery(1000, r cleanList);
  }
  
  void addProposition(S text, S module) {
    if (syncAddIfNotThere(data, nu(Proposition, +text, +module)))
      change();
  }
  
  void cleanList {
    setField(data := objectsWhereFieldGreaterThan(cloneList(data), 'date, now()-expiryTime));
  }
}