Update delete-unreferenced-derivations

To delete from latest_build_status as well.
This commit is contained in:
Christopher Baines 2020-10-13 20:33:07 +01:00
parent 7936ca2e54
commit 971a474f65

View file

@ -339,6 +339,14 @@ DELETE FROM build_status WHERE build_id IN ("
(string-join build-ids ",") (string-join build-ids ",")
")")) ")"))
(exec-query
conn
(string-append
"
DELETE FROM latest_build_status WHERE build_id IN ("
(string-join build-ids ",")
")"))
(exec-query (exec-query
conn conn
(string-append (string-append