3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-07-26 03:47:23 +02:00
Code Issues Projects Releases Packages Wiki Activity

Merge remote-tracking branch 'origin/staging' into develop

Browse source
This commit is contained in:
Andrey Antukh 2022-03-22 14:34:25 +01:00
commit 0ebc1a766e
1 changed files with 9 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

14
common/src/app/common/logging.cljc
View file

@ -184,11 +184,15 @@
`(do `(do
(send-off logging-agent (send-off logging-agent
(fn [_#] (fn [_#]
(with-context (into {:id (uuid/next)} (try
(get-error-context ~cause) (with-context (-> {:id (uuid/next)}
~context) (into ~context)
(->> (or ~raw (build-map-message ~props)) (into (get-error-context ~cause)))
(write-log! ~logger-sym ~level-sym ~cause))))) (->> (or ~raw (build-map-message ~props))
(write-log! ~logger-sym ~level-sym ~cause)))
(catch Throwable cause#
(write-log! ~logger-sym (get-level :error) cause#
"unexpected error on writting log")))))
nil) nil)
`(let [message# (or ~raw (build-map-message ~props))] `(let [message# (or ~raw (build-map-message ~props))]
(write-log! ~logger-sym ~level-sym ~cause message#) (write-log! ~logger-sym ~level-sym ~cause message#)