[webcanv] reduce timeout in slow mode

1000 ms is too big

Author: linev

gui/webgui6/src/TWebCanvas.cxx

@@ -79,19 +79,20 @@ class TWebCanvasTimer : public TTimer {
    {
       fSlow = slow;
       fSlowCnt = 0;
-      SetTime(slow ? 1000 : 10);
+      SetTime(slow ? 50 : 10);
    }
 
    /// used to send control messages to clients
    void Timeout() override
    {
-      if (fProcessing || fCanv.fProcessingData) return;
+      if (fProcessing || fCanv.fProcessingData)
+         return;
       fProcessing = kTRUE;
       Bool_t res = fCanv.CheckDataToSend();
       fProcessing = kFALSE;
       if (res) {
          fSlowCnt = 0;
-      } else if (++fSlowCnt > 10 && !IsSlow()) {
+      } else if (++fSlowCnt > 100 && !IsSlow()) {
          SetSlow(kTRUE);
       }
    }