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

Merge pull request #2775 from penpot/niwinz-bugfixes-1

Browse source 
🐛 Several backend bugfixes
This commit is contained in:
Alejandro 2023-01-13 14:33:46 +01:00 • committed by GitHub
commit 275eb993ce
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
15 changed files with 23 additions and 201 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -175,14 +175,15 @@
#?(:clj
(defn get-error-context
[error]
(when-let [data (ex-data error)]
(merge
{:hint (ex-message error)
:spec-problems (some->> data ::s/problems (take 10) seq vec)
:spec-value (some->> data ::s/value)
:data (some-> data (dissoc ::s/problems ::s/value ::s/spec))}
(when-let [explain (ex/explain data)]
{:spec-explain explain})))))
(merge
{:hint (ex-message error)}
(when-let [data (ex-data error)]
(merge
{:spec-problems (some->> data ::s/problems (take 10) seq vec)
:spec-value (some->> data ::s/value)
:data (some-> data (dissoc ::s/problems ::s/value ::s/spec))}
(when-let [explain (ex/explain data)]
{:spec-explain explain}))))))
(defmacro log
[& props]