Browse Source

fix: don't initialize rtc components in publishing

Gabriel Horner 1 year ago
parent
commit
7e89dd3865

+ 7 - 6
src/main/frontend/handler/db_based/rtc.cljs

@@ -125,14 +125,15 @@
 
 ;;; background task: try to restart rtc-loop when possible,
 ;;; triggered by `rtc-flows/rtc-try-restart-flow`
-(c.m/run-background-task
- ::restart-rtc-task
- (m/reduce
-  (constantly nil)
-  (m/ap
+(when-not config/publishing?
+ (c.m/run-background-task
+  ::restart-rtc-task
+  (m/reduce
+   (constantly nil)
+   (m/ap
     (let [{:keys [graph-uuid t]} (m/?> rtc-flows/rtc-try-restart-flow)]
       (when (and graph-uuid t
                  (= graph-uuid (ldb/get-graph-rtc-uuid (db/get-db)))
                  (> 5000 (- (common-util/time-ms) t)))
         (prn :trying-to-restart-rtc graph-uuid (t/now))
-        (c.m/<? (<rtc-start! (state/get-current-repo) :stop-before-start? false)))))))
+        (c.m/<? (<rtc-start! (state/get-current-repo) :stop-before-start? false))))))))

+ 6 - 5
src/main/frontend/worker/rtc/core.cljs

@@ -446,11 +446,12 @@
 ;;; ================ API (ends) ================
 
 ;;; subscribe state ;;;
-(c.m/run-background-task
- ::subscribe-state
- (m/reduce
-  (fn [_ v] (worker-util/post-message :rtc-sync-state v))
-  create-get-state-flow))
+(when-not common-config/PUBLISHING
+ (c.m/run-background-task
+  ::subscribe-state
+  (m/reduce
+   (fn [_ v] (worker-util/post-message :rtc-sync-state v))
+   create-get-state-flow)))
 
 (comment
   (do