add missing deref to db connection usage (oops)

This commit is contained in:
Gered 2016-07-31 13:55:31 -04:00
parent ebef05e1f5
commit 153fc9d390

View file

@ -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 = ?"