Bug 23091: Add tests for \->credits and \->debits

Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>

diff --git a/t/db_dependent/Koha/Account/Line.t b/t/db_dependent/Koha/Account/Line.t
index 81b5366..a2c1715 100755 (executable)
--- a/t/db_dependent/Koha/Account/Line.t
+++ b/t/db_dependent/Koha/Account/Line.t
@@ -615,7 +615,7 @@ subtest 'checkout() tests' => sub {
 };
 
 subtest 'credits() and debits() tests' => sub {
-    plan tests => 10;
+    plan tests => 12;
 
     $schema->storage->txn_begin;
 
@@ -670,6 +670,17 @@ subtest 'credits() and debits() tests' => sub {
     $debit = $debits->next;
     is($debit->amount + 0, 12, 'Correct second debit');
 
+    throws_ok
+        { $debit1->debits; }
+        'Koha::Exceptions::Account::IsNotCredit',
+        'Exception is thrown when requesting debits linked to debit';
+
+    throws_ok
+        { $credit1->credits; }
+        'Koha::Exceptions::Account::IsNotDebit',
+        'Exception is thrown when requesting credits linked to credit';
+
+
     $schema->storage->txn_rollback;
 };