🎉 Add full teams administration.

This commit is contained in:
Andrey Antukh 2020-10-05 18:20:39 +02:00 committed by Hirunatan
parent f6830b4b85
commit 142036891a
62 changed files with 3175 additions and 1606 deletions

View file

@ -8,7 +8,9 @@
;; Copyright (c) 2020 UXBOX Labs SL
(ns app.util.timers
(:require [beicon.core :as rx]))
(:require
[beicon.core :as rx]
[promesa.core :as p]))
(defn schedule
([func]
@ -19,6 +21,11 @@
(-dispose [_]
(js/clearTimeout sem))))))
(defn asap
[f]
(-> (p/resolved nil)
(p/then f)))
(defn interval
[ms func]
(let [sem (js/setInterval #(func) ms)]