added more tests.

This commit is contained in:
2023-03-27 07:51:14 -07:00
parent 4fccb47082
commit 8d6832e1fe
3 changed files with 76 additions and 4 deletions

View File

@@ -0,0 +1,22 @@
(ns auto-ap.integration.graphql.transaction-rules
(:require
[auto-ap.graphql.transaction-rules :as sut2]
[auto-ap.integration.util
:refer [setup-test-data test-transaction test-transaction-rule wrap-setup admin-token]]
[clojure.test :as t :refer [deftest testing use-fixtures is]]))
(use-fixtures :each wrap-setup)
(deftest get-transaction-rule-matches
(testing "Should find a single rule that matches a transaction"
(let [{:strs [transaction-id
transaction-rule-id]} (setup-test-data [(test-transaction
:db/id "transaction-id"
:transaction/description-original "Disneyland")
(test-transaction-rule
:db/id "transaction-rule-id"
:transaction-rule/description ".*")])]
(is (= [transaction-rule-id] (->> (sut2/get-transaction-rule-matches {:id (admin-token)}
{:transaction_id transaction-id}
nil)
(map :id)))))))