gistfile1.txt

(defn cart-line-items [cid _db & [organization]]
  (d/q '[:find ?e ?org ?name ?price ?dl_or_ph
         :in $ ?cart
         :where
         [?e :line_item/cart ?cart]
         [?cart :cart/subtotal ?subtotal]
         [?e :line_item/content ?content]
         [?e :line_item/dl_or_ph ?dl_or_ph]
         [?e :line_item/price ?price]
         [?content :content/collection ?coll]
         [?coll  :collection/organization ?org]
         [?org :user/name ?name]]
       _db cid))
 
;organization is optional... end up writing this wtf query... 

(defn cart-line-items [cid _db & [organization]]
  (if organization
    (d/q '[:find ?e ?org ?name ?price ?dl_or_ph
           :in $ ?cart ?org
           :where
           [?e :line_item/cart ?cart]
           [?e :line_item/content ?content]
           [?e :line_item/dl_or_ph ?dl_or_ph]
           [?e :line_item/price ?price]
           [?content :content/collection ?coll]
           [?coll  :collection/organization ?org]
           [?org :user/name ?name]]
         _db cid organization)
    (d/q '[:find ?e ?org ?name ?price ?dl_or_ph
           :in $ ?cart
           :where
           [?e :line_item/cart ?cart]
           [?e :line_item/content ?content]
           [?e :line_item/dl_or_ph ?dl_or_ph]
           [?e :line_item/price ?price]
           [?content :content/collection ?coll]
           [?coll  :collection/organization ?org]
           [?org :user/name ?name]]
         _db cid)))