|
|
@ -46,9 +46,8 @@
|
|
|
|
(h (-> instance :schema :name))
|
|
|
|
(h (-> instance :schema :name))
|
|
|
|
" "
|
|
|
|
" "
|
|
|
|
[:small (h (:name instance))]]
|
|
|
|
[:small (h (:name instance))]]
|
|
|
|
[:p
|
|
|
|
[:p [:small [:a {:href (path :instance-edit-form instance)}
|
|
|
|
[:small [:a {:href (path :instance-edit-form instance)}
|
|
|
|
"Edit Instance"]]]
|
|
|
|
"Edit Instance"]]]
|
|
|
|
|
|
|
|
[:h2 "Properties"]
|
|
|
|
[:h2 "Properties"]
|
|
|
|
(for [prop (:properties instance)
|
|
|
|
(for [prop (:properties instance)
|
|
|
|
:let [attr (:attribute prop)
|
|
|
|
:let [attr (:attribute prop)
|
|
|
@ -87,6 +86,8 @@
|
|
|
|
(h (-> instance :schema :name))
|
|
|
|
(h (-> instance :schema :name))
|
|
|
|
" "
|
|
|
|
" "
|
|
|
|
[:small (h (:name instance))]]
|
|
|
|
[:small (h (:name instance))]]
|
|
|
|
|
|
|
|
[:p [:small [:a {:href (path :instance-show instance)}
|
|
|
|
|
|
|
|
"Back to Instance"]]]
|
|
|
|
[:h2 "Edit Instance"]
|
|
|
|
[:h2 "Edit Instance"]
|
|
|
|
(hform/form-to [:post (path :instance-edit instance)]
|
|
|
|
(hform/form-to [:post (path :instance-edit instance)]
|
|
|
|
(form/render-widgets form form-data req)
|
|
|
|
(form/render-widgets form form-data req)
|
|
|
|