anchor.diff:  unit PublishServerUS;
  +
  +// todo: handling changeobject event for chart will trigger multiple charts?
  +// todo: .. and ref chart is not taken into account
   
   interface
   
  
positive.code: 
  function TUSChart.getJSON: string;
  begin
    if fChanged or not fChanged then    //to do remove the not fChanged
    begin
      TMonitor.Enter(Self);
      try
  
negative.code:   end;
    if clientMessage <> '' then
    begin
      clientMessage := '{"type":"updatechart", "payload":[' + clientMessage + ']}';
      fScenario.forEachSubscriber<TClient>(procedure (aClient: TClient)
        begin
          aClient.signalString(clientMessage);
  