diff options
author | Michael Hwang <mhwang@research.att.com> | 2018-02-22 19:05:02 -0500 |
---|---|---|
committer | Michael Hwang <mhwang@research.att.com> | 2018-02-22 19:08:28 -0500 |
commit | 308a8f90cc66b033535aa4c5c2098bb5bfcb26ee (patch) | |
tree | 797e5caed087789bb24095e6a130a1e4d55f4c85 /test/sch/inventory_client_test.clj | |
parent | d914d08a70f018468e4b909a780c753ebce243e9 (diff) |
Fix monkeypatching issue, use clj-fakes
Change-Id: I8ae31c1b3dfff3096e4bfef709a8f0581d2e9a7c
Issue-ID: DCAEGEN2-260
Signed-off-by: Michael Hwang <mhwang@research.att.com>
Diffstat (limited to 'test/sch/inventory_client_test.clj')
-rw-r--r-- | test/sch/inventory_client_test.clj | 17 |
1 files changed, 10 insertions, 7 deletions
diff --git a/test/sch/inventory_client_test.clj b/test/sch/inventory_client_test.clj index 86f369c..493a186 100644 --- a/test/sch/inventory_client_test.clj +++ b/test/sch/inventory_client_test.clj @@ -21,7 +21,8 @@ (ns sch.inventory-client-test (:use (clojure test)) (:require [sch.inventory-client :as ic] - [cheshire.core :refer [generate-string]]) + [cheshire.core :refer [generate-string]] + [clj-fakes.core :as f]) ) @@ -42,9 +43,10 @@ {:status 200 :body result})] (let [results {:items [{:typeId "123"}]} conn (ic/create-inventory-conn "http://inventory") - fake-get-success (partial fake-get (generate-string results)) - nada (intern 'clj-http.client 'get fake-get-success)] - (is (= (:items results) (ic/get-service-types! conn []))) + fake-get-success (partial fake-get (generate-string results))] + (f/with-fakes + (f/patch! #'clj-http.client/get fake-get-success) + (is (= (:items results) (ic/get-service-types! conn [])))) ))) @@ -53,7 +55,8 @@ {:status 200 :body result})] (let [result {:typeId "123"} conn (ic/create-inventory-conn "http://inventory") - fake-post-success (partial fake-post (generate-string result)) - nada (intern 'clj-http.client 'post fake-post-success)] - (is (= result (ic/post-service-type! conn {}))) + fake-post-success (partial fake-post (generate-string result))] + (f/with-fakes + (f/patch! #'clj-http.client/post fake-post-success) + (is (= result (ic/post-service-type! conn {})))) ))) |