bug: Fix manipulate duplicated project

This commit is contained in:
Alejandro Alonso 2023-03-22 07:56:04 +01:00 committed by Alonso Torres
parent f05e37590a
commit 6b4bca50ee
2 changed files with 7 additions and 5 deletions

View file

@ -231,12 +231,13 @@
;; Defer all constraints
(db/exec-one! conn ["SET CONSTRAINTS ALL DEFERRED"])
(let [project (db/get-by-id conn :project project-id)
(let [project (-> (db/get-by-id conn :project project-id)
(assoc :is-pinned false))
files (db/query conn :file
{:project-id (:id project)
:deleted-at nil}
{:columns [:id]})
{:project-id (:id project)
:deleted-at nil}
{:columns [:id]})
project (cond-> project
(string? name)