From 0a6575304a927afbcb4b5c248dae245d238de36a Mon Sep 17 00:00:00 2001
From: Cam Saul <cam@geotip.com>
Date: Tue, 7 Jul 2015 16:29:17 -0700
Subject: [PATCH] test fix

---
 src/metabase/db.clj | 12 ++++--------
 1 file changed, 4 insertions(+), 8 deletions(-)

diff --git a/src/metabase/db.clj b/src/metabase/db.clj
index 532c96817f2..1543ca4a64f 100644
--- a/src/metabase/db.clj
+++ b/src/metabase/db.clj
@@ -288,19 +288,15 @@
 
 ;; ## EXISTS?
 
-(defn -exists?
-  [entity kwargs]
-  (boolean (seq (k/select (i/entity->korma entity)
-                          (k/fields [:id])
-                          (k/where kwargs)
-                          (k/limit 1)))))
-
 (defmacro exists?
   "Easy way to see if something exists in the db.
 
     (exists? User :id 100)"
   [entity & {:as kwargs}]
-  `(-exists? ~entity '~(if (seq kwargs) kwargs {})))
+  `(boolean (seq (k/select (i/entity->korma ~entity)
+                           (k/fields [:id])
+                           (k/where ~(if (seq kwargs) kwargs {}))
+                           (k/limit 1)))))
 
 ;; ## CASADE-DELETE
 
-- 
GitLab