From 8aed7d4ed6456858ea39b86bc3b613ff739bb60f Mon Sep 17 00:00:00 2001
From: Rohit Aggarwal <rohit.aggarwal@gmail.com>
Date: Tue, 8 Oct 2013 17:12:11 +0100
Subject: [PATCH] Marked all label tests as edge-features.

---
 .../neocons/rest/test/labels_test.clj            | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

diff --git a/test/clojurewerkz/neocons/rest/test/labels_test.clj b/test/clojurewerkz/neocons/rest/test/labels_test.clj
index 74e30a2..f8dd2cf 100644
--- a/test/clojurewerkz/neocons/rest/test/labels_test.clj
+++ b/test/clojurewerkz/neocons/rest/test/labels_test.clj
@@ -6,45 +6,45 @@
 
 (neorest/connect! "http://localhost:7474/db/data/")
 
-(deftest test-creating-one-label
+(deftest ^{:edge-features true} test-creating-one-label
   (let [n (nodes/create)]
     (is (= (labels/get-all-labels n) []))
     (labels/add n "MyLabel")
     (is (= (labels/get-all-labels n) ["MyLabel"]))))
 
-(deftest test-creating-multiple-label
+(deftest ^{:edge-features true} test-creating-multiple-label
   (let [n (nodes/create)]
     (labels/add n ["MyLabel", "MyOtherLabel"])
     (is (= (labels/get-all-labels n) ["MyLabel", "MyOtherLabel"]))))
 
-(deftest test-creating-invalid-label
+(deftest ^{:edge-features true} test-creating-invalid-label
   (let [n (nodes/create)]
     (is (thrown-with-msg? Exception #"null value not supported"
                           (labels/add n nil)))))
 
-(deftest test-replacing-label
+(deftest ^{:edge-features true} test-replacing-label
   (let [n (nodes/create)]
     (labels/add n "MyLabel")
     (labels/replace n ["MyOtherLabel", "MyThirdLabel"])
     (is (= (labels/get-all-labels n) ["MyOtherLabel", "MyThirdLabel"]))))
 
-(deftest test-deleting-label
+(deftest ^{:edge-features true} test-deleting-label
   (let [n (nodes/create)]
     (labels/add n "MyLabel")
     (labels/remove n "MyLabel")
     (is (= (labels/get-all-labels n) []))))
 
-(deftest test-get-all-nodes-with-label
+(deftest ^{:edge-features true} test-get-all-nodes-with-label
   (let [n (nodes/create)]
     (labels/add n "MyLabel")
     (is (some #(= (:id %) (:id n)) (labels/get-all-nodes "MyLabel")))))
 
-(deftest test-get-all-nodes-with-label-and-property
+(deftest ^{:edge-features true} test-get-all-nodes-with-label-and-property
   (let [n (nodes/create {"name" "bob ross"})]
     (labels/add n "MyLabel")
     (is (some #(= (:id %) (:id n)) (labels/get-all-nodes "MyLabel" "name" "bob ross")))))
 
-(deftest test-get-all-labels
+(deftest ^{:edge-features true} test-get-all-labels
   (let [n (nodes/create)]
     (labels/add n "MyLabel")
     (is (some #(= % "MyLabel") (labels/get-all-labels)))))