Include project name on files queries.

Just for convenience.
This commit is contained in:
Andrey Antukh 2019-12-18 23:47:29 +01:00
parent 51058dd83a
commit 34d33a2d83
3 changed files with 5 additions and 19 deletions

View file

@ -23,6 +23,7 @@
(s/def ::token ::us/string)
(s/def ::user ::us/uuid)
;; --- Query: Projects
(su/defstr sql:projects
@ -41,6 +42,7 @@
(-> (db/query db/pool [sql:projects user])
(p/then' (partial mapv decode-row))))
;; --- Helpers
(defn decode-row