feat(Visualization): Pause data retrieval on visibility change

zentrum-lexikographie · Dec 23, 2024 · 5cf45b5 · 5cf45b5
1 parent 513c7c6
commit 5cf45b5
Showing 1 changed file with 10 additions and 0 deletions.
diff --git a/src/dwds/livestream/viz.cljs b/src/dwds/livestream/viz.cljs
@@ -150,7 +150,17 @@
 (def start-rendering!
   (partial listen-to-page-requests render-page-request))
 
+(defn register-visibility-listener!
+  []
+  (js/document.addEventListener
+   "visibilitychange"
+   (fn []
+     (if (.-hidden js/document)
+       (stop-event-retrieval!)
+       (start-event-retrieval!)))))
+
 (defn ^:dev/after-load start!
   []
+  (register-visibility-listener!)
   (start-rendering!)
   (start-event-retrieval!))