add missing deref to db connection usage (oops)
This commit is contained in:
parent
ebef05e1f5
commit
153fc9d390
|
@ -6,7 +6,7 @@
|
|||
|
||||
(defn add-list!
|
||||
[name public? requires-qualities?]
|
||||
(vexec! view-system db
|
||||
(vexec! view-system @db
|
||||
["insert into lists
|
||||
(name, is_public, require_qualities)
|
||||
values
|
||||
|
@ -15,14 +15,14 @@
|
|||
|
||||
(defn remove-list!
|
||||
[list-id]
|
||||
(vexec! view-system db
|
||||
(vexec! view-system @db
|
||||
["delete from lists
|
||||
where id = ?"
|
||||
(int list-id)]))
|
||||
|
||||
(defn update-list-name!
|
||||
[list-id name]
|
||||
(vexec! view-system db
|
||||
(vexec! view-system @db
|
||||
["update lists
|
||||
set name = ?
|
||||
where id = ?"
|
||||
|
@ -30,7 +30,7 @@
|
|||
|
||||
(defn update-list-note!
|
||||
[list-id note]
|
||||
(vexec! view-system db
|
||||
(vexec! view-system @db
|
||||
["update lists
|
||||
set notes = ?
|
||||
where id = ?"
|
||||
|
@ -38,7 +38,7 @@
|
|||
|
||||
(defn update-list-visibility!
|
||||
[list-id public?]
|
||||
(vexec! view-system db
|
||||
(vexec! view-system @db
|
||||
["update lists
|
||||
set is_public = ?
|
||||
where id = ?"
|
||||
|
|
Loading…
Reference in a new issue