diff --git a/deps.edn b/deps.edn index 0816e53f..41cef88d 100644 --- a/deps.edn +++ b/deps.edn @@ -1,7 +1,7 @@ {:deps {org.clojure/clojure {:mvn/version "1.11.2"} org.clojure/core.async {:mvn/version "1.6.681"} com.fluree/db {:git/url "https://github.com/fluree/db.git" - :git/sha "478c4fe92bbc28691d331bff72243618aa067a46"} + :git/sha "050e230e26be5edc933bd3db823ffa029ec0ac70"} com.fluree/json-ld {:git/url "https://github.com/fluree/json-ld.git" :git/sha "0958995acf5540271d1807fc6d8f2da131164e24"} diff --git a/test/fluree/server/integration/basic_transaction_test.clj b/test/fluree/server/integration/basic_transaction_test.clj index cee3619b..2ee6d4b3 100644 --- a/test/fluree/server/integration/basic_transaction_test.clj +++ b/test/fluree/server/integration/basic_transaction_test.clj @@ -64,6 +64,51 @@ (is (= {"ledger" ledger-name, "t" 2} (-> res :body json/read-value (select-keys ["ledger" "t"]))))))) +(deftest ^:integration ^:json transaction-with-dbs-at-multiple-t-values + (testing "can transact with a where clause" + (let [ledger-name (create-rand-ledger "transact-endpoint-multi-ledger") + req1 (json/write-value-as-string + {"@context" test-system/default-context + "ledger" ledger-name + "insert" {"id" "ex:transaction-test" + "type" "schema:Test" + "ex:name" "transact-endpoint-json-test"}}) + res1 (api-post :transact {:body req1, :headers json-headers}) + _ (assert (= 200 (:status res1))) + req2 (json/write-value-as-string + {"@context" test-system/default-context + "ledger" ledger-name + "insert" {"id" "?t" + "ex:name" "new-name"} + "delete" {"id" "?t" + "ex:name" "transact-endpoint-json-test"} + "where" {"id" "?t", "type" "schema:Test"}}) + res2 (api-post :transact {:body req2, :headers json-headers})] + (is (= 200 (:status res2))) + (is (= [{"id" "ex:transaction-test" + "type" "schema:Test" + "ex:name" "new-name"}] + (->> {:body (json/write-value-as-string + {"@context" test-system/default-context + "select" {"ex:transaction-test" ["*"]} + "from" ledger-name}) + :headers json-headers} + (api-post :query) + :body + json/read-value))) + + (is (= [{"id" "ex:transaction-test" + "type" "schema:Test" + "ex:name" "transact-endpoint-json-test"}] + (->> {:body (json/write-value-as-string + {"@context" test-system/default-context + "select" {"ex:transaction-test" ["*"]} + "from" (str ledger-name "?t=2")}) + :headers json-headers} + (api-post :query) + :body + json/read-value)))))) + (deftest ^:integration ^:json transaction-with-where-clause-test (testing "can transact with a where clause" (let [ledger-name (create-rand-ledger "transact-endpoint-json-test")