 (deftest test-create-app
   (is (instance? compassus.core.CompassusApplication *app*))
   (is (om/reconciler? (c/get-reconciler *app*)))
-  (is (= (-> (c/get-reconciler *app*)
-           om/app-state
-           deref
+  (is (= (-> @(c/get-reconciler *app*)
            (dissoc ::c/route))
         init-state))
-  (is (contains? (-> (c/get-reconciler *app*)
-                   om/app-state
-                   deref)
-        ::c/route))
+  (is (contains? @(c/get-reconciler *app*) ::c/route))
   (is (some? (c/root-class *app*)))
   (is (fn? (c/root-class *app*)))
   (is (some? #?(:clj  (-> (c/root-class *app*) meta :component-name)

                          (cb (remote-parser {} remote)))}})
        r (c/get-reconciler app)]
    (c/mount! app nil)
    (is (contains? @(om/app-state (c/get-reconciler app)) :foo))))

(def idents-state
  {:item/by-id {0 {:id 0 :name "some item"}}})

                                              :parser (om/parser {:read posts-read})}})
        r (c/get-reconciler app)
        p (-> r :config :parser)]
    (is (not= posts-init-state (dissoc @r ::c/route)))
    (is (= (-> (p {:state (-> r :config :state)} (om/get-query (c/root-class app)))
               (get ::c/route-data))
           posts-init-state))))
