|
|
@ -1,6 +1,7 @@
|
|
|
|
(ns wanijo.schema.forms
|
|
|
|
(ns wanijo.schema.forms
|
|
|
|
(:require [wanijo.attribute.db :as db-attr]
|
|
|
|
(:require [wanijo.attribute.db :as db-attr]
|
|
|
|
[wanijo.attribute.domain :as domain-attr]
|
|
|
|
[wanijo.attribute.domain :as domain-attr]
|
|
|
|
|
|
|
|
[wanijo.schema.domain :as domain-schema]
|
|
|
|
[clojure.string :refer [capitalize]]
|
|
|
|
[clojure.string :refer [capitalize]]
|
|
|
|
[clojure.spec.alpha :as spec]))
|
|
|
|
[clojure.spec.alpha :as spec]))
|
|
|
|
|
|
|
|
|
|
|
@ -17,7 +18,7 @@
|
|
|
|
(def schema
|
|
|
|
(def schema
|
|
|
|
{:fields {:name {:label "Name"
|
|
|
|
{:fields {:name {:label "Name"
|
|
|
|
:required true
|
|
|
|
:required true
|
|
|
|
:spec :wanijo.schema.db/name}
|
|
|
|
:spec ::domain-schema/name}
|
|
|
|
:uuid {:widget :hidden}}})
|
|
|
|
:uuid {:widget :hidden}}})
|
|
|
|
|
|
|
|
|
|
|
|
(def attr-form
|
|
|
|
(def attr-form
|
|
|
|