ソースを参照

fix syntax of datomic attribute type.

Lucas Stadler 12 年 前
コミット
af023972df
共有1 個のファイルを変更した1 個の追加1 個の削除を含む
  1. 1 1
      clj/clarity/clarity/types.clj

+ 1 - 1
clj/clarity/clarity/types.clj

45
    {:error (str "Expected value of type Map, but got value " val ".")}))
45
    {:error (str "Expected value of type Map, but got value " val ".")}))
46
46
47
(def datomic-attr-type
47
(def datomic-attr-type
48
  '(HMap :mandatory {:db/id (Value "#db/id[db.part/db]")
48
  '(HMap :mandatory {:db/id (Value "#db/id[:db.part/db]")
49
                     :db/ident Keyword
49
                     :db/ident Keyword
50
                     :db/valueType (U (Value :db.type/keyword)
50
                     :db/valueType (U (Value :db.type/keyword)
51
                                      (Value :db.type/string)
51
                                      (Value :db.type/string)