diff --git a/backend/src/app/http/errors.clj b/backend/src/app/http/errors.clj index aa82cb354..35e58bbca 100644 --- a/backend/src/app/http/errors.clj +++ b/backend/src/app/http/errors.clj @@ -55,13 +55,16 @@ ::yres/body (ex-data err)}) (defmethod handle-error :restriction - [err _ _] + [err request _] (let [{:keys [code] :as data} (ex-data err)] (if (= code :method-not-allowed) {::yres/status 405 ::yres/body data} - {::yres/status 400 - ::yres/body data}))) + + (binding [l/*context* (request->context request)] + (l/err :hint "restriction error" :data data) + {::yres/status 400 + ::yres/body data})))) (defmethod handle-error :rate-limit [err _ _] diff --git a/backend/src/app/loggers/database.clj b/backend/src/app/loggers/database.clj index 476180be0..41584eddc 100644 --- a/backend/src/app/loggers/database.clj +++ b/backend/src/app/loggers/database.clj @@ -59,7 +59,7 @@ :props (pp/pprint-str props :length 50) :hint (or (ex-message cause) @message) :trace (or (::trace record) - (ex/format-throwable cause :data? false :explain? false :header? false :summary? false))} + (some-> cause (ex/format-throwable :data? false :explain? false :header? false :summary? false)))} (when-let [params (or (:request/params context) (:params context))] {:params (pp/pprint-str params :length 30 :level 13)}) @@ -74,9 +74,8 @@ {:explain explain}))))) (defn error-record? - [{:keys [::l/level ::l/cause]}] - (and (= :error level) - (ex/exception? cause))) + [{:keys [::l/level]}] + (= :error level)) (defn- handle-event [{:keys [::db/pool]} {:keys [::l/id] :as record}]