mirror of
https://github.com/penpot/penpot.git
synced 2025-05-10 06:06:39 +02:00
Merge remote-tracking branch 'origin/staging' into develop
This commit is contained in:
commit
7f5b0f359c
4 changed files with 8 additions and 14 deletions
|
@ -66,8 +66,8 @@
|
|||
(:id profile)
|
||||
(db/interval bounce-max-age)])]
|
||||
|
||||
(and (< complaints complaint-threshold)
|
||||
(< bounces bounce-threshold)))))
|
||||
(and (< (or complaints 0) complaint-threshold)
|
||||
(< (or bounces 0) bounce-threshold)))))
|
||||
|
||||
(defn has-complaint-reports?
|
||||
([conn email] (has-complaint-reports? conn email nil))
|
||||
|
|
|
@ -62,7 +62,8 @@
|
|||
(when uri
|
||||
(l/info :msg "initializing mattermost error reporter" :uri uri)
|
||||
(let [output (a/chan (a/sliding-buffer 128)
|
||||
(filter #(= (:level %) "error")))]
|
||||
(filter (fn [event]
|
||||
(= (:logger/level event) "error"))))]
|
||||
(receiver :sub output)
|
||||
(a/go-loop []
|
||||
(let [msg (a/<! output)]
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue