 (defmethod read [nil ::route-data]
   [{:keys [state user-parser] :as env} key params]
   (let [st @state
-        route (get st ::route)
-        route (cond-> route
-                (util/unique-ident? route) first)
+        route (unwrap-route (get st ::route))
         query (infer-query env route)
         ret (user-parser env query)]
     {:value (get ret route)}))

  "Returns the application's root class."
  [app]
  (-> app :config :root-class))

(defn- make-root-class
  [{:keys [routes wrapper]}]

(defmethod read [:default ::route-data]
  [{:keys [state target ast user-parser] :as env} key params]
  (let [st @state
        route (unwrap-route (get st ::route))
        query (infer-query env route)
        ret (user-parser env query target)]
    (when-not (empty? ret)
