From f3080d8e091693484b26ca903ab70817c32acdee Mon Sep 17 00:00:00 2001
From: Nathan Marz <nathan@nathanmarz.com>
Date: Wed, 24 Jun 2015 18:15:07 -0400
Subject: [PATCH] fix mutable cells (not sure what problem was

---
 src/com/rpl/specter/impl.cljc | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/src/com/rpl/specter/impl.cljc b/src/com/rpl/specter/impl.cljc
index 4b943c4..d569148 100644
--- a/src/com/rpl/specter/impl.cljc
+++ b/src/com/rpl/specter/impl.cljc
@@ -315,12 +315,10 @@
 
 ;; cell implementation idea taken from prismatic schema library
 (defprotocol PMutableCell
-  (get_cell [cell])
   (set_cell [cell x]))
 
 (deftype MutableCell [^:volatile-mutable q]
   PMutableCell
-  (get_cell [this] q)
   (set_cell [this x] (set! q x)))
 
 (defn mutable-cell
@@ -331,7 +329,7 @@
   (set_cell cell val))
 
 (defn get-cell [cell]
-  (get_cell cell))
+  (field cell 'q))
 
 (defn update-cell! [cell afn]
   (let [ret (afn (get-cell cell))]