              (if (keyword-identical? k :view/state)
                (do (ensure-state! this)
                    (.-re$state this))
-               (gobj/get this (str "re$" (v-util/camelCase (name k)))))
+               (gobj/get this (class-key k)))
 
              (identical? ns "spec")
              (get (.-re$spec this) k)

          (set! (.-re$dbPatterns this) patterns))
        value))))

(def ^:private kmap
  "Mapping of methods-map keys to React lifecycle keys."
  {:constructor "constructor"
   :view/initial-state "$initialState"
   :view/state "$state"
   :view/did-catch "componentDidCatch"
   :view/will-mount "componentWillMount"
   :view/did-mount "componentDidMount"
   :view/will-receive-props "componentWillReceiveProps"
   :view/will-receive-state "componentWillReceiveState"
   :view/should-update "shouldComponentUpdate"
   :view/will-update "componentWillUpdate"
   :view/did-update "componentDidUpdate"
   :view/will-unmount "componentWillUnmount"
   :view/render "render"})

(defn compseq
  "Compose fns to execute sequentially over the same arguments"

             (if (keyword-identical? k :view/state)
               (do (ensure-state! this)
                   (.-re$state this))
               (gobj/get this (class-key k)))

             (identical? ns "spec")
             (get (.-re$spec this) k)
