From 4c8aeebafc42017c316818d79fb8a9a832df9cd6 Mon Sep 17 00:00:00 2001 From: Alex Engelberg Date: Tue, 19 Apr 2016 11:55:32 -0700 Subject: [PATCH] Switch from atom to mutable-cell --- src/clj/com/rpl/specter.cljx | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/src/clj/com/rpl/specter.cljx b/src/clj/com/rpl/specter.cljx index fb564c4..4667ed0 100644 --- a/src/clj/com/rpl/specter.cljx +++ b/src/clj/com/rpl/specter.cljx @@ -266,10 +266,10 @@ (transform* [this structure next-fn] (let [select-result (compiled-select late structure) transformed (next-fn select-result) - values-to-insert (atom transformed)] + values-to-insert (i/mutable-cell transformed)] (compiled-transform late - (fn [_] (let [next-val (first @values-to-insert)] - (swap! values-to-insert rest) + (fn [_] (let [next-val (first (i/get-cell values-to-insert))] + (i/update-cell! values-to-insert rest) next-val)) structure)))))