Reduce duplication more

oakes · Dec 18, 2013 · 968da97 · 968da97
1 parent 962b478
commit 968da97
Showing 1 changed file with 2 additions and 6 deletions.
diff --git a/common/clojure/nightweb/db.clj b/common/clojure/nightweb/db.clj
@@ -425,9 +425,5 @@
 
 (defn delete-user
   [user-hash]
-  (let [statement ["userhash = ?" user-hash]]
-    (jdbc/delete! @spec :user statement)
-    (jdbc/delete! @spec :post statement)
-    (jdbc/delete! @spec :pic statement)
-    (jdbc/delete! @spec :fav statement)
-    (jdbc/delete! @spec :tag statement)))
+  (doseq [table [:user :post :pic :fav :tag]]
+    (jdbc/delete! @spec table ["userhash = ?" user-hash])))