robur/builder-web
4
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix broken query remove_all_by_username

Browse source
This commit is contained in:
Reynir Björnsson 2021-10-26 13:22:31 +02:00
parent 87a6b95e8c
commit a249eb0572
1 changed files with 8 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
db/builder_db.ml
View file

@ -666,7 +666,14 @@ module Access_list = struct
let remove_all_by_username = let remove_all_by_username =
Caqti_request.exec Caqti_request.exec
Caqti_type.string Caqti_type.string
"DELETE FROM access_list, user WHERE access_list.user = user.id AND user.username = ?" {| DELETE FROM access_list
WHERE access_list.id IN (
SELECT access_list.id
FROM access_list
INNER JOIN user ON access_list.user = user.id
WHERE user.username = ?
)
|}
end end