johanels/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-12-12 06:24:17 +01:00
Code Issues Actions 9 Packages Projects Releases Wiki Activity

✨ Adjust error reporting thresholds

Browse Source
This commit is contained in:
Andrey Antukh
2023-11-21 13:35:19 +01:00
parent 3dc629d2ad
commit d1fba8982e
2 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
backend/src/app/loggers/database.clj
View File

@@ -71,7 +71,7 @@
(when-let [data (some-> data (dissoc ::s/problems ::s/value ::s/spec ::sm/explain :hint))] (when-let [data (some-> data (dissoc ::s/problems ::s/value ::s/spec ::sm/explain :hint))]
{:data (pp/pprint-str data :width 200)}) {:data (pp/pprint-str data :width 200)})
(when-let [explain (ex/explain data {:level 10 :length 50})] (when-let [explain (ex/explain data {:level 8 :length 20})]
{:explain explain}))))) {:explain explain})))))
(defn error-record? (defn error-record?

4
common/src/app/common/exceptions.cljc
View File

@@ -93,7 +93,7 @@
explain? true explain? true
chain? true chain? true
data-length 10 data-length 10
data-level 5}}] data-level 4}}]
(letfn [(print-trace-element [^StackTraceElement e] (letfn [(print-trace-element [^StackTraceElement e]
(let [class (.getClassName e) (let [class (.getClassName e)
@@ -127,7 +127,7 @@
(-> (ex-message cause) (-> (ex-message cause)
(str/lines) (str/lines)
(first) (first)
(str/prune 100))) (str/prune 130)))
(when-let [^StackTraceElement e (first (.getStackTrace ^Throwable cause))] (when-let [^StackTraceElement e (first (.getStackTrace ^Throwable cause))]
(printf " (%s:%d)" (or (.getFileName e) "") (.getLineNumber e))) (printf " (%s:%d)" (or (.getFileName e) "") (.getLineNumber e)))