Compare commits
2
Commits
main
..
f08e5f02f1
| Author | SHA1 | Date | |
|---|---|---|---|
|
|
f08e5f02f1 | ||
|
|
e1b2188495 |
@@ -3,13 +3,6 @@
|
|||||||
|
|
||||||
:deps {org.clojure/clojure {:mvn/version "1.12.3"}
|
:deps {org.clojure/clojure {:mvn/version "1.12.3"}
|
||||||
|
|
||||||
;; Security overrides for transitive web/runtime dependencies.
|
|
||||||
com.fasterxml.jackson.core/jackson-core {:mvn/version "2.21.4"}
|
|
||||||
com.fasterxml.jackson.core/jackson-databind {:mvn/version "2.21.4"}
|
|
||||||
io.undertow/undertow-core {:mvn/version "2.3.21.Final"}
|
|
||||||
org.jboss.xnio/xnio-api {:mvn/version "3.8.14.Final"}
|
|
||||||
org.jboss.xnio/xnio-nio {:mvn/version "3.8.14.Final"}
|
|
||||||
|
|
||||||
;; Routing
|
;; Routing
|
||||||
metosin/reitit {:mvn/version "0.9.2"}
|
metosin/reitit {:mvn/version "0.9.2"}
|
||||||
|
|
||||||
|
|||||||
@@ -19,12 +19,9 @@
|
|||||||
;; log uncaught exceptions in threads
|
;; log uncaught exceptions in threads
|
||||||
(Thread/setDefaultUncaughtExceptionHandler
|
(Thread/setDefaultUncaughtExceptionHandler
|
||||||
(fn [thread ex]
|
(fn [thread ex]
|
||||||
;; Integrant exceptions include component configuration in ex-data. Logging
|
(log/error {:what :uncaught-exception
|
||||||
;; the exception object can therefore disclose database or cookie secrets.
|
:exception ex
|
||||||
(log/error {:what :uncaught-exception
|
:where (str "Uncaught exception on" (.getName thread))})))
|
||||||
:exception-class (.getName (class ex))
|
|
||||||
:message (.getMessage ex)
|
|
||||||
:where (str "Uncaught exception on " (.getName thread))})))
|
|
||||||
|
|
||||||
|
|
||||||
(defonce system (atom nil))
|
(defonce system (atom nil))
|
||||||
|
|||||||
@@ -3,6 +3,5 @@
|
|||||||
[clojure.test :refer [deftest is]]
|
[clojure.test :refer [deftest is]]
|
||||||
[pmagnus.elprice.core :as core]))
|
[pmagnus.elprice.core :as core]))
|
||||||
|
|
||||||
|
|
||||||
(deftest system-state-is-managed-in-an-atom
|
(deftest system-state-is-managed-in-an-atom
|
||||||
(is (instance? clojure.lang.Atom core/system)))
|
(is (instance? clojure.lang.Atom core/system)))
|
||||||
|
|||||||
Reference in New Issue
Block a user