github/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2026-09-11 14:39:35 +00:00
Code Issues Packages Projects Releases Wiki Activity

🐛 Fix issue on logging (backend)

Browse Source
This commit is contained in:
Andrey Antukh 2022-03-22 14:33:27 +01:00
parent ad262f6fb3
commit bf6211903c
1 changed files with 9 additions and 5 deletions
Show Stats 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#)