Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-04-13 23:41:24 -05:00
Code Issues Activity

💄 Minor cosmetic change on database logger processor

Browse source
This commit is contained in:
Andrey Antukh 2022-02-10 00:02:12 +01:00 • committed by Alonso Torres
parent 8babb59f75
commit d358185a04
1 changed files with 6 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
backend/src/app/loggers/database.clj
View file

@ -69,12 +69,15 @@
(defmethod ig/pre-init-spec ::reporter [_]
(s/keys :req-un [::wrk/executor ::db/pool ::receiver]))
(defn error-event?
[event]
(= "error" (:logger/level event)))
(defmethod ig/init-key ::reporter
[_ {:keys [receiver] :as cfg}]
(l/info :msg "initializing database error persistence")
(let [output (a/chan (a/sliding-buffer 128)
(filter (fn [event]
(= (:logger/level event) "error"))))]
(let [output (a/chan (a/sliding-buffer 5)
(filter error-event?))]
(receiver :sub output)
(a/go-loop []
(let [msg (a/<! output)]