Clojure 有很多不起作用
我有两张桌子Clojure 有很多不起作用,clojure,korma,Clojure,Korma,我有两张桌子 CREATE TABLE public.user_account ( id integer NOT NULL DEFAULT nextval('user_account_id_seq'::regclass), email character(50) NOT NULL, password character(100) NOT NULL, CONSTRAINT user_account_pkey PRIMARY KEY (id) ) CREATE TABLE publ
CREATE TABLE public.user_account
(
id integer NOT NULL DEFAULT nextval('user_account_id_seq'::regclass),
email character(50) NOT NULL,
password character(100) NOT NULL,
CONSTRAINT user_account_pkey PRIMARY KEY (id)
)
CREATE TABLE public.recipe
(
id integer NOT NULL DEFAULT nextval('recipe_id_seq'::regclass),
user_account_id integer NOT NULL,
name text NOT NULL,
description text NOT NULL,
CONSTRAINT recipe_pkey PRIMARY KEY (id),
CONSTRAINT recipe_user_account_id_fkey FOREIGN KEY (user_account_id)
REFERENCES public.user_account (id) MATCH SIMPLE
ON UPDATE NO ACTION ON DELETE NO ACTION
)
这是我的clojure声明
(declare user_account recipe)
(kc/defentity user_account
(kc/entity-fields :email :password)
(kc/has-many recipe {:fk :user_account_id})
)
(kc/defentity recipe
(kc/entity-fields :user_account_id :name :description)
(kc/belongs-to user_account {:fk :user_account_id})
)
而且我无法使用recipe
user=> (sql-only (kc/select user_account (with recipe) (where {:id 1})))
"SELECT \"user_account\".\"email\", \"user_account\".\"password\" FROM \"user_account\" WHERE (\"user_account\".\"id\" = ?)"
我遇到了同样的问题。解决方案是将pk字段添加到父实体的
实体字段
列表中。这确实不是直观的,而且问题似乎出在糟糕的文档中。因此,解决方案应该是:
(declare user_account recipe)
(kc/defentity user_account
(kc/entity-fields :id :email :password)
; ^^^ fix is here
(kc/has-many recipe {:fk :user_account_id})
)
(kc/defentity recipe
(kc/entity-fields :user_account_id :name :description)
(kc/belongs-to user_account {:fk :user_account_id})
)
由于这个问题和糟糕的文档,A切换到了yesql。但是谢谢你的回答