diff --git a/src/mtgcoll/models/lists.clj b/src/mtgcoll/models/lists.clj
index d3e03b9..e4f53be 100644
--- a/src/mtgcoll/models/lists.clj
+++ b/src/mtgcoll/models/lists.clj
@@ -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 = ?"