From 6fc29f2c44ac555f8d5ef1ec6a2df3503edcd583 Mon Sep 17 00:00:00 2001 From: Scott Ostler Date: Sun, 13 Feb 2011 01:03:29 -0500 Subject: Fixed buggy assert-update logic --- src/utils.clj | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'src/utils.clj') diff --git a/src/utils.clj b/src/utils.clj index ee64789..25814f9 100755 --- a/src/utils.clj +++ b/src/utils.clj @@ -269,8 +269,7 @@ (insert-values table cols values))) (defn assert-update - ([res ok err] (if (not (= (first res) 1)) err ok)) - ([res] (assert-update res true false))) + ([res] (= (first res) 1))) (defn sql-array [type arr] (with-connection *db* -- cgit v1.2.3-70-g09d2