Note: broken transaction machinery

After removing records and relying entirely on protocols, transaction handling is broken because you can't `assoc` into a non-map.
This commit is contained in:
Sean Corfield 2019-01-10 18:24:55 -08:00
parent a5027066f9
commit 73a7b2af10

View file

@ -93,6 +93,7 @@
;; should check isolation level; maybe implement save points? ;; should check isolation level; maybe implement save points?
(f con) (f con)
(with-open [^AutoCloseable t-con (assoc (get-connection con) (with-open [^AutoCloseable t-con (assoc (get-connection con)
;; FIXME: not a record/map!
:transacted (atom committable?))] :transacted (atom committable?))]
(let [^Connection jdbc t-con (let [^Connection jdbc t-con
old-autocommit (.getAutoCommit jdbc) old-autocommit (.getAutoCommit jdbc)