From 85c4905b3ccb94dfdb2272e92de6ba1051e304e3 Mon Sep 17 00:00:00 2001
From: Stuart Halloway <stu@thinkrelevance.com>
Date: Tue, 23 Jun 2009 23:29:33 -0400
Subject: gtic: updated clojure tests to new template syntax, commented out
 "all-are" tests

---
 src/clojure/contrib/test_clojure/clojure_set.clj | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'src/clojure/contrib/test_clojure/clojure_set.clj')

diff --git a/src/clojure/contrib/test_clojure/clojure_set.clj b/src/clojure/contrib/test_clojure/clojure_set.clj
index 33e9f2c3..3e698406 100644
--- a/src/clojure/contrib/test_clojure/clojure_set.clj
+++ b/src/clojure/contrib/test_clojure/clojure_set.clj
@@ -12,7 +12,7 @@
 
 
 (deftest test-union
-  (are (= _1 _2)
+  (are [x y] (= x y)
       (set/union) #{}
 
       ; identity
@@ -65,7 +65,7 @@
   ; at least one argument is needed
   (is (thrown? IllegalArgumentException (set/intersection)))
   
-  (are (= _1 _2)
+  (are [x y] (= x y)
       ; identity
       (set/intersection #{}) #{}
       (set/intersection #{1}) #{1}
-- 
cgit v1.2.3-18-g5258