notid/integreat
1
0
Fork 0
Code Issues Pull Requests 3 Actions Packages Projects Releases Wiki Activity

tweaks

Browse Source
This commit is contained in:
Bryce
2026-05-11 22:50:28 -07:00
parent 6b5d33a32f
commit 47720692b9
3 changed files with 1 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
.opencode/skills/implement-tests/SKILL.md
View File

@@ -2,6 +2,7 @@
name: implement-tests name: implement-tests
description: Guidance for implementing tests given the provided described behaviors description: Guidance for implementing tests given the provided described behaviors
--- ---
# Implement Tests from Behavior Specs # Implement Tests from Behavior Specs
Use this skill when you need to implement integration and unit tests for behaviors documented in a markdown spec file. This is a structured, iterative workflow that delegates to a subagent and verifies the results. Use this skill when you need to implement integration and unit tests for behaviors documented in a markdown spec file. This is a structured, iterative workflow that delegates to a subagent and verifies the results.

8
test/clj/auto_ap/integration/graphql.clj
View File

@@ -67,14 +67,6 @@
(is (int? (:start result))) (is (int? (:start result)))
(is (seqable? (:journal-entries result))))))) (is (seqable? (:journal-entries result)))))))
(deftest vendors
(testing "vendors"
(testing "it should find vendors"
(let [result (:ledger-page (:data (sut/query (admin-token) "{ ledger_page(filters: {client_id: null}) { count, start, journal_entries { id } }}")))]
(is (int? (:count result)))
(is (int? (:start result)))
(is (seqable? (:journal-entries result)))))))
(deftest transaction-rule-page (deftest transaction-rule-page
(testing "it should find rules" (testing "it should find rules"
(let [result (-> (sut/query (admin-token) "{ transaction_rule_page(client_id: null) { count, start, transaction_rules { id } }}") (let [result (-> (sut/query (admin-token) "{ transaction_rule_page(client_id: null) { count, start, transaction_rules { id } }}")

2
test/clj/auto_ap/integration/graphql/ledger/running_balance.clj
View File

@@ -69,8 +69,6 @@
;; NOTE: upsert-running-balance now uses proper accounting signs: ;; NOTE: upsert-running-balance now uses proper accounting signs:
;; asset accounts increase with debit (positive), equity accounts increase with credit (negative here) ;; asset accounts increase with debit (positive), equity accounts increase with credit (negative here)
(sut/upsert-running-balance conn) (sut/upsert-running-balance conn)
(println (d/pull (d/db conn) '[*] line-1-1))
(is (= [10.0 60.0 210.0] (is (= [10.0 60.0 210.0]
(map #(pull-attr (d/db conn) :journal-entry-line/running-balance %) [line-1-1 line-2-1 line-3-1]))) (map #(pull-attr (d/db conn) :journal-entry-line/running-balance %) [line-1-1 line-2-1 line-3-1])))
(is (= [-10.0 -60.0 -210.0] (is (= [-10.0 -60.0 -210.0]