        [:join
         [:properties
          {[:link [user 1]]
-          [[:prefixed-properties {:base db
-                                  :children [[:aliased-property
-                                              {:property [:simple id]
-                                               :as :as :alias db-id}]]}]
+          [[:prefixed-properties
+            {:base db
+             :children [[:aliased-property
+                         {:property [:simple id]
+                          :as :as :alias db-id}]]}]
            [:aliased-property {:property [:simple name]
                                :as :as :alias nm}]]}]]]]
     '[{[user 1] [db [id :as db-id] name :as nm]}]))

    '[(a {b c d e})]

    '[[:parameterization
       {:query [:property [:join [:properties {[:simple a]
                                               [[:property [:simple b]]
                                                [:property [:simple c]]]}]]]
        :parameters {d e f g}}]]
    '[({a [b c]} {d e f g})]

    '[[:parameterization {:query [:aliased-property {:property [:simple a]
                                                     :as :as :alias b}]
                          :parameters {c d e f}}]]
    '[(a :as b {c d e f})]

    '[[:parameterization
       {:query [:aliased-property
                {:property [:join [:properties {[:simple a]
                                                [[:property [:simple b]]
                                                 [:property [:simple c]]]}]]
                 :as :as :alias d}]
        :parameters {e f g h}}]]
    '[({a [b c]} :as d {e f g h})]))



    '[{:name users :type :join
       :join-source {:name users :type :property}
       :join-target
       [{:name user/name :type :property}
        {:name current-user :type :join
         :join-source {:name current-user :type :link :link-id _}
         :join-target [{:name user/name :type :property}]}]}]
    '[{users [user [name] {[current-user _] [user [name]]}]}]))

(deftest om-next-query-for-joins-with-sub-links
