     :type :relator}
 
    :text-field
-   {:resource (fn [uri binding meta vals]
+   {:resource (fn [uri binding active url meta vals]
                 (hic/html [:label (str (:title meta) " ")
                    [:input {:type "text"
                             :class "text-field-binding"

    :value (fn [parent uri binding meta val]
             uri)
    :update nil
    :type :projector}
   :column8
   {:display (fn [meta vals]
               (hic/html [:div.span8 vals]))

        sub-calls (map (fn [child] (s-rec child model url-parts)) children) ;; make the next part of the tree
        meta-data (get-meta-data binding model)]

    (cond
          (= type :relator)

          (let [statement (get-bound binding model) ;; fuckery for binding
                relation-getter (fn [data resource] (relator statement data resource))
                child-func (:value bindable)
                parent-func (:resource bindable)
                myp (first (relate-right model (prop (:path db)) binding))
                mypath (and myp (.getString (.asLiteral myp)))
                ]
            (fn [data child resource url built-url]

